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ELŐSZÓ 


A SIMON s BASIC a COMMODORE 64-es nagy népszerűségnek örvendő programbővíté- . 
se. A programozás legkülönbözőbb területein használható, a száznál is több utasítás a 
COMMODORE BASIC-ot hatékony programnyelvvé teszi. Ha a SIMONss BASIC által 
nyújtott programozási lehetőségeket teljes egészében ki akarja használni, részletesen 
meg kell ismernie az egyes utasításokat. Tapasztalataink szerint ez elég nehéz a prog- 
rambővítéshez kapott könyv alapján, mivel az nem elég részletes, és a belső összefüggé- 
sek magyarázatával nem foglalkozik. 
Ezért a COMMODORE 64-es felhasználói számos problémával fordultak hozzánk, amely 
arra ösztönzött bennünket, hogy kiadjunk egy minden igényt kielégítő SIMON ss BASIC 
gyakorlókönyvet. A könyv két szerzője bizonyára nem ismeretlen Önök előtt. Axel! Plen- 
ge, aki a sikeres , SUPERGRAPHIK " szerzője, e könyvben — másként nem is lehetne — 
a SIMONs BASIC grafikai és zenei lehetőségeit ismerteti. A további fejezeteket teljes 
egészében Norbert Szezepanowski készítette, aki már a "FLOPPY-BUCHM"-ban is bebizo- 
nyította a COMMODORE-gépek sokoldalúságát. 
Ön most e két szerző hónapokig tartó, aprólékos munkájának eredményét tartja a 
kezében. A könyv ismerteti a SIMONs BASIC utasításait, kiegészítve az alkalmazási 
lehetőségeket bemutató számtalan példával. Minden egyes utasítással külön foglalkozik, 
. így a könyvet lexikonszerűen használhatja. 
Jó szórakozást kíván a könyv tanulmányozásához és a SIMON s BASIC alkalmazásához 


ai Dr. Achim Becker 
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1. FEJEZET 
BEVEZETÉS 


A SIMONss BASIC-ről először mint kényelmes BASIC-bővítési lehetőségről hallottunk, 
majd mikor közelebbről is megismerkedtünk vele, rájöttünk, hogy a C—64-eshez ez az 
igazi "BÖVÍTÉS". 

A Commodore 64-es sok rendkívüli képességéről győzte meg Önt, ezért végül vásárolt 
is egyet. Hazatérve azonban, mikor a felhasználói kézikönyvet először átolvasta, rá 
kellett jönnie, hogy a gép által kínált lehetőségek az eredeti BASIC V2-vel (a C—654-es 
standard BASIC-je) csak nehezen valósíthatók meg. A grafika, a zene és a sprite-ok 
vezérlése számtalan PEEK és POKE utasítást igényel, amelyek végül áttekinthetetlenné 
és hosszúvá teszik a programot. Ezenkívül lehetetlen a magas szintű programnyelvektől 
elvárható szisztematikus és kényelmes programozás megvalósítása. Ciklusok szervezé- 
séhez például mindössze egyetlen utasításpár (FOR. ..NEXT) áll rendelkezésünkre és 
nem jobb a helyzet a feltételes operációkra (IF), vagy az ugrási utasításokra (GOTO/ 
GOSUB) vonatkozóan sem. 

A program kiíratása egyedül a LIST paranccsal oldható meg, amely nem nyújt túl sok 
lehetőséget. 

Összefoglalva: aki számítógépén nem csak előregyártott programokat kíván futtatni, 
hanem komoly feladatokat szeretne megoldani, annak mindenképpen szüksége van erre 
a BASIC bővítésre. 

A SIMON ss BASIC az univerzális programozóknak készült, és így szinte minden olyan 
részfunkcióhoz kiegészítő utasításokkal szolgál, amelyek a Commodore 64-est az 1983-as 
év számítógépévé tették. 

Azoknak, akik a programozásnak csak egy részterületéveli foglalkoznak (pl. zene, grafika 
stb.) egyéb, speciális bővítésekhez, vagy más programformákhoz kell folyamodniuk. Ettől 
eltekintve mind a kezdőknek, mind pedig a haladóknak érdemes elsajátítaniuk a SIMON s 
BASIC-et. 

Az olyan programozási segédeszközök, mint a funkcióbillentyük használata, különböző 
listázási lehetőségek, vagy a BASIC-sorok átszámozásának lehetősége, mind a kényel- 
mes és gyors programozást segítik. Ahol egyébként hosszadalmas utasításokat kellene 
billentyűznie, a SIMON "s BASIC-kel elég egyetlen gombnyomás. Számos, magas szintű 
programnyelvből származó szerkezeti utasítás (pl. REPEAT vagy a szimbolikus címzés) 
könnyíti meg nagy teljesítményű programok készítését. 

A Commodore 64 alkalmazási lehetőségeinek egész tárházát nyitják meg Ön előtt a 
képernyőre vonatkozó utasítások: a formálás, grafika készítés, sprite-ok, a karakterkész- 
let módosítása, többszínű és nagyfelbontású grafika,... stb. Több grafikai utasítás segíti 
a bonyolult grafikák képernyőre vitelét és kinyomtatását. 

Természetesen nincs program hiba vagy hiányosság nélkül. Ne várjuk ezt el tehát a 
SIMON s BASIC-től se. Előfordul, hogy valamelyik funkció nem hajtható végre a kívánt 
módon, vagy alkalmazása a program szétesését eredményezi. Igyekszünk felhívni a 
figyelmét ezekre a buktatókra és lehetőségeink szerint segíteni fogjuk Önt abban, hogy 
jól sikerült programokat írjon. Előrebocsátjuk, hogy bizonyos területeken, pl. a grafika 
tárolása vagy lemezhasználat, még több utasításra volna szükség, mert ezekhez a 
SIMON ss BASIC is csak kevés támogatást nyújt. 

Könyvünkben az egyes utasításokat lehetőleg érthetően és főként rends-ciezve próbál- 
juk ismertetni. Az eredeti SIMON s BASIC-kézikönyvet, sok hiányossága és rendszerte- 
len felépítése miatt nem is vettük figyelembe. Az utasításokat teljesen más elven, egy- 
másra építve tárgyaljuk. 

Először a programozási segédeszközökkel és hibakezelésekkel foglalkozunk, majd a 
strukturált programozás utasításain keresztüi eljutunk a be- és kivitelvezérlés terjedel- 
mes fejezetéhez, amelyhez a grafika, a sprite és a zene programozása kapcsolódik. 
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Minden fejezet végén teszt-lap található, amellyel az ismeretek elsajátítása ellenőrizhe- 
tő. A megoldásokat a könyv végén közöljük. 

Reméljük, hogy tanulmányaihoz egy átfogó és információkban gazdag segédeszközt 
tudunk a kezébe adni ezzel a könyvvel. Külön felhívjuk figyelmét a 9.3 fejezetben szerep- 
lő három olyan utasításra, amelyek az eredeti kézikönyvből kimaradtak és egyébként 


sem ismertek. 


Megjegyzések a magyar változathoz: 


— Mindazokat a könyvben szereplő programokat, melyeknek listája a következő három 
sorral kezdődik 


1 REM $kkökök ök 
2 REM r CIM : 
3 REM ts kák krt 
mágneslemezre rögzítettük, általában a 2. sorban feltüntetett címen. Ahol ettől eltértünk, 


külön jelezni fogjuk. 
-— A programok betöltésének általános szabálya, hogy a program címe szóközt (space) 


nem tartalmazhat. A forma egyébként az általánosan ismert: 
LOAD"CIM" 8 


parancs. 


14 / 


2. FEJEZET . 
Programozási segédeszközök 


2.1 A funkcióbillentyűk használata 


A legtöbb személyi számítógépen megtalálhatók az ún. funkcióbillentyűk, amelyek a 

gyakran használatos utasítások vitelét leegyszerűsítik. Két változatuk ismert: 

a) Az egyénileg használható funkcióbillentyűk, amelyekhez a felhasználó tetszőleges 
jelsorozatot rendelhet. 

b) Az ún. ASCII funkcióbillentyűk, amelyekhez a többi billentyűhöz hasonlóan ASCII érték 
tartozik. Működtetésük a programban lekérdezhető és a program futása ennek függ- 
vényében folytatható. 


A C—64-es standard változata csak az utóbbival rendelkezik. A nyolc billentyű ASCII-kódja 
a következő: 

F1— 133 F3—134 F5-135 F7- 136 

F2— 137 F4-— 138 F6-—-139 F8-— 140 


Lekérdezésük a programon belül például így történik: 


P.1 v 


1 REM áeeretesdetesese ge teát ekezet aki 

2 REM k FUNKCIOBILLENTYU 3 

3 REM seökáteljeseseskesk destedesdteke ge teak etek 

108 GET X$:IF X$-"" THEN 100 

195 IF ASC(CX$I2C133 OR ASC(X$2214ú THEN 199 - 

118 PRINT" A FUNKCIOBILLENTYU ASCII ERTEKE: S ENSESZBŐ 
129 GLTU 109 


Ez a program csak valamely funkcióbillentyű lenyomását fogadja el, és kiírja annak 
ASCII-kódját. A program a RUN/STOP billentyűvel állítható meg. 

A funkcióbillentyűk tulajdonképpeni rendeltetése azonban nem ez. A SIMON s BASIC 
lehetőséget nyújt arra, hogy a COMMODORE billentyű (C—) alkalmazásával! további 
nyolc funkcióbillentyűt hozzunk létre és mindegyikhez egy-egy (összesen tehát 161!) 
utasítást vagy egyéb jelláncot rendeljünk. 

A 16 funkcióbillentyűt a következő táblázatban foglaltuk össze: 


Funkcióbillentyű Megvalósítás 
Ft F1 
F2 SHIFT-F1 
F3 F3 
F4 SHIFT-t-F3 
FS F5 
F6 SHIFT F5 
F7 F7 
F8 SHIFT F7 
F9 § C — SHIFT-tF1 
F10 C — 4SHIFTtF1 
F11 C — 4F3 
F12 C — 4FSHEFTTF3 
F13 C—-— FS 
F14 C — 4 SHIFT-HFS5 
"F15 C — HF? 
F16 C — 4SHIFTTEF7 
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2.1.1 KEY - a funkcióbillentyűk meghatározása 


Formátum: KEY sz, "füzér" 
Paraméterek: sz. — A funkcióbillentyű száma (1-16) 
füzér — (sztring, angol: string) (füzér vagy füzérváltozó max. 15 karakter) 


Funkció: Az sz. számú funkcióbillentyűhöz valamilyen utasítást vagy egyéb jelszo- 
rozatot rendel. 
Példa: KEY 1, "LIST — 1007 


Az Ft gomb és a RETURN lenyomása után a programot a 100. sortól kilistázza. 
Haz azt szeretnénk, hogy a funkcióbillentyű az utasítást követő RETURN-t is tartalmazza, 
akkor a jelsorozathoz hozzá kell kapcsolnunk a RETURN ASCII kódját. Az alábbi két példa 
mutatja a különbséget: 

a) KEY 1, "PRINT 16157 

b) KEY 3, "PRINT 1616" 4 CHR$(13) 


Az F1 és F3 gombok lenyomásakor tapasztalhatjuk a különbséget. 

Természetesen ennek a megoldásnak sincs mindig értelme. Ha például a téves beírás 
káros következményekkel járhat (pl.: NEW), célszerű az automatikus RETURKN-t elkerülni, 
így módunk lehet a hibás beírás korrigálására. Gyakorlásképpen adjon utasításokat a 
funkcióbillentyűknek úgy, hogy a záró RETURN-t is tartalmazzák. 

A funkcióbillentyűket program keretében is leköthetjük. Ezáltal lehetővé válik a hozzá- 
rendelések tárolása és szükség esetén a program behívásával máris rendelkezésünkre 
állnak a billentyűk által képviselt funkciók. 


100 KEY 1, "LIST" CHR$ (13) 
110 KEY 3, "GOTO" 

120 KEY 5, "PRINT" 

130 KEY 6, "OPEN 1.,8,15" 


A KEY-utasítás a következő sajátossággal rendelkezik, ez egy kicsit meg is nehezíti a j 


használatát: az utasításban vagy egyéb karaktersorozatban szereplő idézőjeleket csak : - 


ASCII kód formájában Írhatjuk be. Például rendeljük hozzá az F1 billentyűhöz a LOAD 
"$",8 utasítást. Ez csak így lehetséges: 


.KEY 1, "LOAD" -£ CHR$(34) 4 "$7CHR$(34) 7. alélt szd 


Sajnos ez egy kicsit bonyolult, de hosszabb jelsorozatok esetén mégis érdemes megpró- 
bálkozni vele. Az idézőjeleket tehát a t CHR$(34) t jelkombinációval kell helyettesíte- 
nünk. j 

További jellegzetesség, hogy a funkcióbillentyűk meghatározása közvetlenül a program 
segítségével is elvégezhető. Ekkor azonban a karakterek között sem vessző, sem kettős- 
pont nem szerepelhet, mivel ezeket az INPUT nem fogadja el. 

A következő programmal párbeszédes formában definiálhatók a funkcióbillentyűk: 


" P.2 


1 REM edett 

2 REMXKEVYEx 

3 REM adtáedötetektkökök 

199 INPUT"A FUNKCIOBILLENTYU SZAMA: ";N 

1109 INPUT"FUNKCIO:";2$ 

1208 PRINT"A RETURN-T IS KITEGYEM CI/N2?" 
1989 GET X$:1F X$C2"N" AND X$C2"I" THEN 139 
149 IF X$z"I" THEN Z$5Z$1CHR$(13?) 

159 IF LEN(Z$2C16 THEN 178 

169 PRINT"MAX. 15 KRRAKTER!":GOTO 194 

170 KEY N.2$ 

180 PRINT"YVAN MEG LEKOTES (I/N2?" 

199 GET 0$:IF O$O"N" AND 0$€5"I" THEN 199 
299 IF 0$-"I"THEN 189 

210 END 


A program behívás után RUN-nal indítható. 

Elfogadja az idézőjeleket, de a vesszőt és a kettőspontot nem. 

Kívánság szerint hozzáfűzi a RETURN-t. A karaktersorozat hossza a RETURN-nel együtt 
max. 15 karakter lehet. 

Egy ötlet:Ha az F1 billentyűhöz hozzárendeli a KEY1, "?FRE(O)" -t- CHR$(13) utasítást, 
, gombnyomásra" bármikor lekérdezheti a szabad tárkapacitást. 

FIGYELEM!A rendelkezésünkre álló SIMON" s BASIC-lemez nem teszi lehetővé a funk- 
cióbillentyűk definiálásának törlését. Pl.: a KEY 1, " " utasítás nem az F1 billentyű 
funkciójának törlését, hanem annak határozatlan karakterekkel való feltöltődését ered- 
ményezi. Ennek azonban tulajdonképpen nincs is jelentősége, mert egy új KEY utasítás- 
sal a funkcióbillentyűhöz bármikor új tartalmat rendelhetünk. 


2.1.2 DISPLAY - a funkcióbillentyűk tartalma 


Formátum: DISPLAY 

Paraméterek: — 

Funkció: A funkcióbillentyűk tartalmának kiírása. 
Megjegyzés: Helyettesíthető a "KEY b utasítással. 


A funkcióbillentyűk alkalmazása jelentősen megkönnyíti a programírást, de azok tartal- 
mát, főleg ha egyszerre többet is használunk, könnyen elfelejthetjük. 

Hogy ne kelljen a billentyűket egyenként végigpróbálgatnunk, a DISPLAY utasítással 
kiírathatjuk a képernyőre azok tartalmát. 

A SIMON s BASIC betöltése után a funkcióbillentyük "üresek", ezért a DISPLAY utasítás 
beírására az alábbi lista jelenik meg a képernyőn: 


KEYIT " 
KÉVZ 18 
KEYS size 
KEY4, " " 
KEVO ZS 
KEY6, "" 


KEY16, " " 


A kurzort bármelyik sorra állítva a KEY utasítás módosítható (a végén természetesen a 
RETURKN-t is le kell nyomni). 

A DISPLAY utasítást minden további nélkül nyomtatóra is alkalmazhatjuk. Gyakorlott 
programozók most azt mondják, hogy , ez csak természetes", de ne felejtsük el, hogy 
könyvünk nem kizárólag haladóknak készült. 

Tehát az eljárás a következő: 


OPEN 1,4 IZ RETURN: 
CMD 1 Z RETURN- 
DISPLAY IX RETURN: 


A funkcióbillentyűk tartalma most "írásban" is rendelkezésünkre áll. 
Végezetül ne felejtsük el lezárni a nyomtatócsatornát a CLOSE 1-gyel. 


17 


2.1.3 Ellenőrző kérdések 


1. Mint tudjuk, a funkcióbillentyűket a KEY utasítással köthetjük le. Az alábbi utasítások 
egyike nem helyes: 


a) KEY 1, "LIST" 
(B) KEY 6, "RUN" 
C) KEY B, A$ 


2. Melyik utasítással rendelné hozzá az F5 billentyűhöz a "LIST" utasítást, automatikus 
RETURN-nel? 


a) KEY 5, "LIST" 4 "RETURN" 
b) KEY 5, "LIST" 4 CHR$(34)) 
(6ö)-KEY 5, "LIST" --HCHR$(13) 


3. Rendelje hozzá .az F1 billentyűhöz a LOAD "$",8 utasítást, automatikus RETURN-nel. 
Melyik lehetőséget választaná? 


a) KEY1, "LOAD"$",8"--HCHR$(13) 
b) KEY1, "LOAD"$",8" 4 CHR$(34) 

7) KEY1, "LOAD" -- CHR$(34) -t "$" - CHR$(34) —- "8" - CHR$(13) 
d) KEY1, "LOAD" 4 CHR$(13) -H "$" 4 CHR$(13) -- "8" t- CHR$(34) 


4. A funkcióbillentyűhöz rendelt karaktersorozat legfeljebb hány karakterből állhat? 
a) 255 
b) 15 f ; ; 
c) 16 ( f 
d) 256 § 
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2.2 A kényelmes programozás 


2.2.1 AUTO - automatikus sorszámozás 


Formátum: AUTO ssz, Ip 
Paraméterek: ssz — a sorszámozás kezdőértéke 
Ip — lépték (1—255) 
Funkció: Automatikus sorszámozás tetszőleges kezdőértékkel és léptékkel. 
Példa: AUTO 100,10 


A RETURN lenyomása után a képernyő bal szélén megjelenik a 100-as sorszám és 
mögötte a kurzor. Beírható a programsor, majd újabb RETURN után megjelenik a 110-es 
sorszám. Folytatódhat a program írása. 

Mint tudjuk, a programírás során a BASIC-sorokat sorszámmal keli ellátni, amelyek 
"közlik" az interpreterrel az utasítások végrehajtásának sorrendjét. Léptékként az 1-et 
is választhatjuk, de akkor a továbbiakban nincs lehetőségünk újabb sorok beszúrására. 
Érdemes tehát megfelelően nagy (általában 10-es) léptéket választani. 

Az AUTO utasítás megkönnyíti számunkra a programírást, hiszen a sorszámok beírásá- 
val nem kell foglalkoznunk. 

Ha a sorszám megjelenése után közvetlenül, lenyomjuk a RETURN-t (úgy, hogy a sorba 
nem írunk semmit), az automatikus sorszámozás megszűnik és a hagyományos módon 
dolgozhatunk tovább. (A begépeléskor elkövetett hibák csak így javíthatók. Utána az 
AUTO utasítás újra kiadható). 

Megjegyzendő, hogy az utasítás a sorszámozás végét (63 999) nem ismeri fel, ezért az 
alábbi példában látható eset következhet be: 


AUTO 63500,100 RETURN 
63500 PRINT " 
63600 PRINT 
63700 PRINT 
63800 PRINT 
. 63900 PRINT 
64000 PRINT 


AES át B 


?SYNTAX ERROR. 
READY 
64100 


A 64000-es sorszám kiadása SYNTAX ERROR-t eredményez, amelyhez a gép a 64100-as 
sorszámot kapcsolta. 

Ha most be szeretnénk fejezni az automatikus sorszámozást, a RETURN lenyomása 
újabb SYNTAX ERROR-hoz vezet. 

A számozás határát persze a legritkább esetben érjük el és ha elérjük is, nincs káros 
következménye. Elég tehát, ha a fentieket egyszerűen csak tudomásul vesszük. 

Ha meglévő programrészt kívánunk az AUTO utasítás használatával folytatni, ügyelnünk 
kell a következőkre: a kezdőérték és a lépték helyes megválasztásával elkerülhetjük, 
hogy olyan sorszám keletkezzék, amely esetleg már létezik a programban. Ha ez előfor- 
dul, az adott sor felülíródik. Az automatikus sorszámozás befejeződik, ha az utoljára 
kiadott sorszám a programban már előfordult, ill. a sor törlését eredményezi. 

Ha ezt időben észrevesszük, a RUN/STOP és a RESTORE billentyű együttes lenyomásá- 
val , mászhatunk" ki a bajból. Mindezt kipróbálhatjuk az alábbi programon: 
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P.3 


1 REM séfegedégédeáédenkjeik 

2 REMXBRUTÓOÚGA 

3 REPI defelekkektek jének 

199 FOR I-65 TŰ 98 

119 PRINT I; 

128 PRINT "ASCII ERTEKHEZ :"; 
198 PRINT CHR$([/); 

198 PRINT " KARAKTER"; 

i56 PRINT " TARTOZIK" 

168 MEXT I 


Tegyük fel, hogy a programot a 200. sortól folytatni szeretnénk. Ehhez az AUTO 200,10- 
utasítást kellene beadnunk, de véletlenül AUTO 100,10-et írunk. Erre a számítógép kiteszi 
a 100-as sorszámot. Ha észrevesszük a hibát és a RETURN-t lenyomva ki akarunk lépni 
az automatikus sorszámozásból, a 100. sor törlődik. Olyenkor csak a RUN/STOP-RESTO- 
RE segít, vagy a törölt sort újból be kell írnunk. 


2.2.2 RENUMBER - átsorszámozás 


Formátum: RENUMBER ssz, Ip 
Paraméterek: ssz — az átsorszámozás kezdősora 


Ip — lépték 
Funkció: Meglévő program átsorszámozása az adott sortól, tetszőleges léptékkel 
Példa: RENUMBER 100,10 


A tárban lévő programot 100-as sorral kezdődően 10-es léptékkel átsorszámozza. 
Megjegyzés: Az utasítás a GOTO/GOSUB utasítások ugrócímeit nem módosítja! 


A RENUMBER segítségünkre van, ha a megírt program túlságosan áttekinthetetlen, vagy 
helyenként túl sűrű a sorszámozás. Egyetlen, de nem elhanyagolható hiányossága, hogy 
az ugrócímeket nem változtatja meg az új sorszámozás szerint. Mivel az alap-BASIC-ben 
történő programozás szinte elképzelhetetlen GOTO és GOSUB utasítások nélkül, azt 
hihetnénk, hogy emiatt ez az utasítás nem is alkalmazható komolyabb eredménnyel. 
A későbbiekben az 5.2 fejezetben bemutatjuk a SIMON s BASIC azon lehetőségét, mely 
szerint ezek az utasítások szimbolikus címekkel is kiadhatók és így a RENUMBER 
utasítás is maradéktalanul alkalmazható. 


Próbáljuk ki az utasítást a következő programon: 


P. 4 
1 REM ES4EKEKREREFEEB EK kk kk 
ZZATSETK teret Ét BI BESE 


3 REI dédedesetené dee tegedet rke dkskak 
19 PRINT"19" 
11 PRINTS11" 
T20PRINTETL2T 
15 FRINT"19" 
28 PRINT"24a" 


Látjuk, hogy a sorszámozás szabálytalan, sőt a 10-11. és 11-12. sor közé már újabb sort 
nem is iktathatunk. Számozzuk át tehát a programot pl. 10-es léptékkel. 
RENUMBER 10,10. 


A LIST utasítással kiírathatjuk az átszámozott, rendezett programunkat. 
20 


10 REM ökőkökökökökők sokök egkök okok ak ak ak ak 
20 REM : RENUMBER 

30 REM öerteökökökökök öket sok gok fole skokaesk 
40 PRINT "107 

50 PRINT "117 

60 PRINT 7127 

70 PRINT "157 

80 PRINT 7207 


A RENUMBER utasítás további kísérletezésre ösztönöz. Mi történik például, ha a léptéket 
0-nak választjuk? 


Próbáljuk ki! 
Tehát! RENUMBER 10,0 I RETURN: , 
majd: LIST 


Szokatlan programlista jelenik meg a képernyőn: 


10 REM ötötök ák ák akk ökle zk ől ok ök ök ök ök okök 
10 REM : RENUMBER - 

10 REM ökőkökök dö ők őő ők ök ökök ök skök okok 
10 PRINT 7107 

10 PRINT "11" 

10 PRINT "12" 

10 PRINT 715" 

10 PRINT 7207 


Próbáljuk ki, hogy működik-e? Meglepődve fogjuk tapasztalni, hogy igen. Sőt, az eljárás- 
ból még hasznunk is származott, mert programunk számára létrehoztunk egyfajta védett- 
séget. Ez a program ugyanis többé nem módosítható. Nem iktatható be új sor és az első 
programsor kivételével a többi nem változtatható. 

Győződjünk meg róla! Próbáljuk megváltoztatni a PRINT 15-öt PRINT 17-re. Nem sikerül. 
Eltűnt viszont az első REM-sor és ehelyett áll most a PRINT 17. Ezentúl, bármely sort 
módosítjuk, mindig csak ez az egy sor fog változni. 

A program egyes sorainak törlése is elég bonyolulttá vált. Ha például a PRINT "20" sort 
törölni akarjuk, előtte "107 RETURN-nel az összes többi sort is ki kell törölni. A program 
kiegészítése 10-nél kisebb és 10-nél nagyobb sorszámokkal természetesen továbbra is 
lehetséges. 


Az utasításnak van egy különlegessége: 


Ha a sorszámozás átlépi a 63999-es határt, akkor az így kapott sorok nem törölhetők. 
Kipróbálhatjuk az előbbi programon, ha beadjuk a RENUMBER 63800,100 utasítást. 
A LIST utasítás az alábbi programot eredményezi. 

63800 PRINT 7107 

63900 PRINT 711" 

64000 PRINT "127 

64100 PRINT 715" 

64200 PRINT 7207 8 
Próbáljuk kitörölni a 64000-es sort. Nem fog sikerülni. A gép mindig SYNTAX ERROR-ral 
válaszol. Ezenkívül arra sincs módunk, hogy ezekre a sorokra GOTO-val, vagy GOSUB- 
bal hivatkozzunk. Ha a gép ilyet talál, szintén kiírja a SZ/NTAX ERROR-t. Ezt a programot 
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2.2.3 MERGE - programok összefűzése 


Formátum:  MERGE "név", ksz 
Paraméterek: név — a betöltendő program neve 
ksz - készülékszám, ahonnan a betöltés történik; (1-kazettás egység, 8-le- 


mezegység) 
Funkció: A tárban lévő programhoz hozzáfűzi a betöltendő programot 
Példa: MERGE"BEV. — RUT." ,8 


A lemezegységről betöltendő program neve BEV.-RUT., melyet a tárban lévő program- 
hoz fűz. Természetesen ilyenkor az is megmarad. 


Megjegyzés: A két program nem tartalmazhat azonos számú sorokat. 


Gyakorlott programozók olyan saját szubrutinokat tudnak kidolgozni, amelyek több prog- 

ramba is beépíthetők. Ezeket a rutinokat valamilyen módon nyilván kell tartani, és jó, ha 

azok bármikor elérhetők. Elképzelhető, hogy ezeket kinyomtatjuk és ha kell, papírról 

bebillentyűzzük. Ez azonban nem valami hatékony eljárás. Sokkal célravezetőbb, ha 

ezeket lemezre rögzítjük, ahonnan szükség esetén bármikor betölthetők és a főprogram- 

hoz fűzhetők. Ez azonban csupán a Commodore operációs rendszerét tekintve, szinte 

megoldhatatlan. (Kivéve a POKE utasítással, de ez nagyon körülményes.) 

A MERGE utasítás ezt a hiányosságot pótolja. Alkalmazásakor a következőkre kell 

figyelemmel lennünk: 

- A két program egyetlen azonos sorszámot sem tartalmazhat. 

- A betöltendő program sorszámainak nagyobbnak kell lenniük a tárban lévő program 
sorszámainál. 

- A két programban különböző változóneveket kell alkalmazni, mert az AZODOSSÁG sok 
és nagyon nehezen kijavítható hibát eredményezhet a későbbiek során. 

A programok MERGE-el történő összekapcsolásakor előforduló problémákat úgy kerül- 

hetjük el a legkönnyebben, ha a programokat azonos elv szerint, áttekinthetően szer- 

kesztjük meg. 

A gyakran használt rutinokat célszerű azonos sorszámtartományba írni, amelyet a fő- 

programok írásához már nem használunk fel. Ugyanez vonatkozik a változónevekre is. 

Mi történik, ha az előbb említett három szabályt nem tartjuk be? Próbáljuk ki az alábbi 

programon: 


10 PRINT"10.SOR — FŐPROGRAM" 
20 PRINT"20.SOR - FŐPROGRAM" 
30 PRINT"30.SOR — FÖPROGRAM" 


Próbáljuk hozzáfűzni a lemezen tárolt MERGE-nevű programot: 


P.5 


1 REM sededereseskeákake te keskökök 
2 REMXMERGE3$ 
3 REM degtdetédesk akét tések 
19 PRI!.T"18.BEOLYASOTT SOR" 
28 FRINT"2A.BEOLYASOTT SOR" 
20 FRINT"38. BEOLYASOTT SOR" 


Az összefűzés a MERGE"MERGE" 8 paranccsal történik. A READY visszajelzés után . 
LIST-tel megnézhetjük, mit műveltünk. Az eredmény valami ilyesmi: 
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P. 6 


19 PRINT"18.S50R-FOFROGRAN" 
28 PRINT"28. 50fR-FOPROGRAT1" 
38 PRINT"39a. 50R-FOPROGRAI1" 
1 REM Médetek esek esle akk 
2 REMXMERGE:3 
3 REM aededktédesedk tedkkk kk 
19 PRINT"19. BEOLYASOTT SOR" 
2 PRINT"28. BEOLVASOTT SOR" 
3£ PRINT"39.BEOLYASUTT SOR" 


Láthatjuk, hogy némelyik sorból kettő is van, sőt a sorok nincsenek sorbarendezve sem. 
Vajon hogy működik ez a program? Próbáljuk ki! Indítsuk el RUN-nal és meglátjuk mi fog 
történni. Legnagyobb meglepetésünkre a BASIC értelmező (interpreter) nem jelez hibát, 
hanem szó nélkül végrehajtja a programot. 

Ez a következőképpen magyarázható: 

A RUN beírásakor először meghatározásra kerül az első BASIC-sor címe. Ez a nulláslap- 
ban (zero-page), a főtároló első 256 byte-jában található. A számítógép itt tárolja azokat 
az információkat, amelyekre az operációs rendszernek vagy az interpreternek a rutinok- 
nál szüksége van. Olyasmi ez, mint egy BASIC-program, amely a fontosabb információ- 
kat változókban helyezi el. A nulláslap tehát az operációs rendszer és az interpreter 
, változótartománya" . 

Az interpreter tehát először az első BASIC-sor címét helyezi el (C64-es esetén mindig 
$0801, azaz 2049) és rögzíti mint "aktuális" sort a nulláslapon. Minden BASIC-sor ezután 
a következő sor címével kezdődik, de ezt a LIST utasítás nem jelzi ki. Az összekapcsolás 
tehát nem a programsorszámok, hanem egy speciális követőcím alapján történik. Az 
eredeti sorszámokra a továbbiakban csak az ugróutasításoknál (GOTO/GOSUB) van 
szükség. Ezek megkeresik az adott sort, és "aktuális" sorrá nyilvánítják. Az interpreter 
a program végét a "O" követőcímről ismeri fel. 

Megállapíthatjuk tehát, hogy azonos sorszámokat tartalmazó program esetében csak az 
ugróutasítások végrehajtásakor merül fel probléma. 

Most nézzük meg, hogy pl. egy GOTO 10 utasítás hatására az interpreter melyik 10-es 
sorra ugrik. Láthatjuk, hogy mindig az elsőre. Ez azért van, mert az interpreter a keresést 
mindig a program elején kezdi. 

Ilyen rendetlen programot természetesen nem használhatunk fel. Tegyük rendbe egy 
" RENUMBER 10,10 utasítással. 


P.7 


19 PRINT"19.5S0R-FOPROGRAM" 

28 PRINT"29.$0R-FOPROGRAM" 

38 PRINT"38.$50R-FOPROGRAIN" 

49. REM Meledededeezjetkekteskeskak 

SO REMXMERGE:x 

60 REM dedegedegeskakaktedetéde ht 

78 PRINT"19.BEOLYASOTT SOR" 
84 PRINT"29. BEOLYASOTT SOR" 
98 PRINT"38. BEOLVASOTT SOR" 


Megjegyzések: A nulláslapon a program kezdetén kívül a program vége is tárolódik. Ha 
egy BASIC program végét POKE utasítással "felemeljük", a MERGE alkalmazásakor 
problémák adódhatnak. Ha ilyesmivel kísérletezünk és a MERGE emiatt hatástalanná 
válik, a NEW és OLD utasításokkal állítható be újra az eredeti programvég. 
Kísérletező kedvű SIMON "ss BASIC rajongóknak ajánljuk, próbálják ki a MERGE"$" 8, 
majd a RENUMBER 10,10 utasítások beírását. Az eredmény LIST-tel kiíratható. 
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2.2.4 Ellenőrző kérdések 


1. Melyik paranccsal valósítható meg az automatikus sorszámozás 100-tól, 10-es lépték- 
kel? 


(a) JAUTO 100,10 
b) AUTO 10,100 
c) AUTO 100 BY 10 
d) AUTO 10 BY 100 


2. Az AUTO-parancsban mekkora a lépték maximális értéke? 


c) nincs korlátozva 
3. Melyik parancsokra nem hat a RENUMBER-utasítás? 


a) FOR/NEXT-ciklus 
b) GOTÓ" 
(6) "GOSUB 
"dj INPÜT 


4. Mire kell ügyelni a MERGE-parancs alkalmazásánál? 


a) A kezdő sorszámnak 100-nál nagyobbnak kell lennie. 

(6) Azonos sorszámok nem lehetnek. 

Te) A betöltendő program sorszámainak nagyobbnak kell lenniük a tárban lévő prog- 
. ram sorszámainál. A 
d) A MERGE alkalmazása előtt a programot RENUMBER-rel át kell sorszámozni. 
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2.3 Listázási segédeszközök 


Programozás közben elkerülhetetlen a programlistába történő betekintés. Legkönnyeb- 
ben a kinyomtatott lista használható, de ennek elkészítése időigényes, nincs is mindenki- 
nek nyomtatója, és kisebb változtatásokhoz felesleges is. Ilyen esetekben legjobb, ha a 
programlista a képernyőn jelenik meg. A C64-es erre nem sok lehetőséget nyújt. Csak 
arra van módunk, hogy a LIST-tel elindítsuk, CTRL-lel lassítsuk és RUN/STOP-pal meg- 
szakítsuk, majd egy újabb LIST beírásával folytassuk a listázást. 

Standard-BASIC-ben a LIST-utasítás a következők szerint használható: 


LIST — a teljes program kilistázása 

LIST n — az n. sor kilistázása (pl. LIST 100) 

LIST —n -— listázás az n. sorig (pl. LIST —100) 

LIST n- — listázás az n. sortól (pl. LIST 100-) 

LIST n1-n2 — listázás az n1. sortól az n2. sorig (pl. LIST 100-500) 


A SIMON ss BASIC ennél jóval több lehetőséget nyújt a listázásra. 


2.3.1! PAGE - a programlista felosztása 

Formátum:  PAGEN 

Paraméterek: n — az egy részben levő képernyősorok száma mínusz 1 (1—23) 
Funkció: A programlistát n-t 1 soronként részekre osztja 

Példa: PAGE 10 


A listázás 11 soronként történik. 
Megjegyzés: A PAGE utasítást a PAGEG hatástalanítja. 


A PACE segítségével a BASIC programot részekre oszthatjuk. A részek hossza szabadon 
választható, de nem haladhatja meg az egy képernyőoldalt. Ne feledjük, hogy nem 
programsorokat, hanem képernyősorokat kell megadni! 


Az utasítás hibája, hogy 23-nál nagyobb számok esetén nem hajtható végre, de hibaüze- 
netet mégsem kapunk. Az lenne a logikus, ha a 255-nél nagyobb érték beírásakor 
megjelenő hibaüzenetet (ILLEGAL OGUANTITY ERROR) a 23-nál nagyobb, hatástalan 
értékek is előidéznék. 

A PAGE-t a következők szerint alkalmazzuk: 


1. LIST . a RETURN: (megjelenik az első rész) 
2. CRETURN-: (megjelenik a következő rész) 
3. A RUN/STOP5 (a listázás megszakítása) 


Megjegyzések: Előfordul, hogy aLIST c RETURN: beadás után a képernyőn megjelenik 
egy 1-es és eltűnik a kurzor. Ilyenkor újból meg kell nyomni a RETURN-t, hogy a listázás 
elkezdődjön. RUN/STOP-pal csak addig szakítható meg a listázás, míg egy teljes rész ki 
nem íródott. 


2.3.2 OPTION - SIMON s BASIC utasítások kiemelése 
Formátum: — OPTION n 
Paraméterek: n — bekapcsoláskor 10, kikapcsoláskor 10-től különböző, de 256-nál kisebb 


szám 

Funkció: Programlista készítésekor a SIMON s BASIC utasítások inverz alakban 
jelennek meg 

Példa: OPTION 10 - az inverz ábrázolás bekapcsolása 


OPTION 0 - az inverz ábrázolás kikapcsolása 
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Ha a SIMON s BASIC utasításokat tartalmazó programunkat standard-BASIC-be kívánjuk 
átírni, rendkívül jól használható ez az utasítás. Gondoljuk csak el, milyen hosszadalmas 
lenne kiemelések nélkül a SIMON s BASIC-utasítások felkutatása bármely programban. 
Az utasítás működését kipróbálhatjuk valamelyik SIMON s BASIC-ben írt programunkon, 
pl. a 2.1.1 pontban található KEY-nevün. Töltsük be a lemezről, majd először OPTION 
10-et beírva LIST-tel írassuk ki a képernyőre. 

Amennyiben a nyomtatónk rendelkezik COMMODORE-üzemmódadal, mindezt papíron is 
ellenőrizhetjük. 


2.3.3 DELAY - a listázási sebesség változtatása 
Formátum:  DELAYn 
Paraméterek: n — késleltetési érték (1—255) 
Funkció: Az n érték függvényében változtatja a listázás sebességét, 
Példa: DELAY 10 
A listázás sebessége SHIFT-tel kb. 50 kar/s lesz. 


A programok listázását alap állapotban a CTRL billentyűvel lassíthatjuk. Ez az utasítás 
lehetővé teszi számunkra, hogy a SHIFT lenyomásával a listázást különböző mértékben 
lassítsuk. Megállítani a C— billentyűvel lehet. 

Néhány jellegzetes értékhez a következő listázási sebesség tartozik: 


n kar/s 

1 290 (kb. normál) 

5 100 
10 50 (kb. mint a CTRL-lel) 
20 25 


A PAGE és DELAY utasítások együttesen is alkalmazhatók, ezáltal egy-egy programrész- 
let késleltetve jeleníthető meg a képernyőn. 

Idővel kialakíthatjuk magunknak a saját PAGE-DELAY értékeinket, amelyeket minden 
program első sorában helyezhetünk el, például így: 


1 PAGE 10 : DELAY 5 


Ezáltal a program beolvasását és indítását követően ez a listázási segédeszköz rendel- 
kezésünkre áll. 


2.3.4 FIND — a füzérek (stringek) felkutatása 
Formátum: FIND kód, vagy FIND füzér 
Paraméterek: kód — minden, ami az idézőjelen kívül áll; 
füzér (füzérek) vagyis idézőjelbe tett karakterek; 
Funkció: A BASIC programban megkeresi az adott karakterkombinációt. 
Példa: FINDPRINT 
Minden olyan sort kiír, amelyben a PRINT utasítás szerepel. 


. Megjegyzés: Szóköz csak akkor állhat a FIND után, ha az is a keresett kombinációhoz 
tartozik. 


Ez az az utasítás, amelyet az eredeti kézikönyv alapján a legkevésbé tudunk megfelelően 
alkalmazni. Nem is csoda, hiszen összesen 11 sor tárgyalja, holott részletes megismerte- 
téséhez talán 11 oldal is kevés volna. 

Mielőtt elmélyednénk megismerésében, fel kell hívni a figyelmet a következő fontos 
jellemzőre. 
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Tudjuk, hogy BASIC-ben a szóközöknek nincs hatásuk, tehát a PRINT10 ugyanazt jelenti, 
mint a PRINT 10. A FIND utasításra mindez nem érvényes, mert a kitett szóköz a 
"keresőfogalom" részét képezi. 
A FINDPRINT 10 kiírja az összes olyan sort, amelyben PRINT 10 szerepei, de azokat nem, 
amelyekben PRINT10 van. 
A paraméterek ismertetésekor már kitértünk arra, hogy ezzel az utasítással BASIC-kódot 
vagy stringet kereshetünk ki. A különbség érzékeltetésére nézzük a következő progra- 
mot: 

10 PRINT "KÉREM AZ A ÉRTÉKÉT" 

20 INPUT A k 

30 PRINT "BEADTA";A;"-T" 
Keressük ki azokat a sorokat, amelyekben "A" van. Beírjuk tehát, hogy 

FINDA LIX RETURN: 
Vajon mely sorok fognak megjelenni? A 20-as és a 30-as. Igaz, hogy a 10. sorban is 
található egy "A", de az idézőjelen belül van. Ez az utasítás az idézőjelben levő karakter- 
kombinációkat csak teljes egészében találja meg. Pl. ha aprogramban szerepel ez a sor: 

10 PRINT "BUDAPEST MAGYARORSZAG FŐVÁROSA", 
akkor a 10. sor csak akkor fog a képernyőn megjelenni, ha a FIND"BUDAPEST MAGYAR- 
ORSZÁG FŐVÁROSA" utasítást adjuk meg, de nem jelenik meg sem a FIND"BUDAPEST" 
sem a FIND"/MAGYARORSZÁG", sem pedig a FIND"FŐVÁROSA" utasításokra. 
Röviden tehát: a FIND utasítás nem alkalmas arra, hogy az idézőjelek közt szereplő 
szövegnek csak egy részét keressük ki vele. 
Lehetőségünk van azonban arra, hogy a fenti szöveget tartalmazó sort egy rövidebb, 
nevezetesen a 


FIND"B 
utasítással keressük ki, bár ilyenkor a képernyőn az összes olyan sor megjelenik, 
amelyben B-vel kezdődő füzér szerepel. 
Töltsük be a lemezről a FIND című programot és gyakoroljuk az utasítás használatát! 


P. 8 


i REM tktkdkkkb d 

2 REMXFINDRA 

3 REM $Etkekkkökök 

24 PRINT"KEREM AZ A ERTEKET"; 
sa INFUT A 

4D PRINT"KEREM A B ERTEKET"; 


59 INPUT B 
€M C-RAB 
78 PRINT"R KET SZAM ÖSSZEGE: " ; 
88 PRINT C 

A következő táblázat alapján próbáljuk ki a lehetőségeket! 
FIND-utasítás kijelzett sorok 
FINDREM 4273 
FINDA 30, 60 
FIND A 30, 
FINDB 50, 60 
FIND B 50, 
FIND"KÉREM 20, 40 
FINDC 60, 80 
FIND C 60, 
FINDA tB 60, 
FINDPRINT 20, 40, 70, 80 
FINDINPUT 30, 50 


FIND; . 20, 40, 70 27 


A kísérletezést folytathatjuk a FIND PRINT utasítás beírásával. A gép most nem jelez ki 
semmit. Mivel a sorszám és az első karakter közti szóközt az interpreter automatikusan 
teszi ki, ebben az esetben azt nem veszi tudomásul. 

Természetesen a BASIC kulcsszavak rövidíthetők, valamint a speciális karakterek is 
kikereshetők. Így például a FINDPRINT egyenértékű a "FIND?" utasítással, a "FIND;" 
pedig kiírja az összes olyan sort, amelyben pontosvessző szerepel. 
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2.3.5 Ellenőrző kérdések 


1. 


Az alábbi utasítások közül melyikkel bontható a programlista 10 képernyősorra? 


a) PAGE 10 
b) PAGE 11 
c) PAGE 9 


. Melyik billentyűvel lehet a PAGE utasítással felosztott listát lapozni: 


aj) RETURN 

b) COMMODORE (C—) 
c) SHIFT 
d) 


. Melyik utasítás aktivizálja a SIMON "s BASIC utasítások inverz kiemelését? 


a) OPTION 
b) OPTION 1 


CC OPTION 10 


d) OPTION 0 


. Melyik utasítással állítható be a listázási sebesség? 


a) DECAY 


(/b)DDELAY 


c) DELLAY 


. Melyik billentyű késlelteti a listázást a képernyőn? 


a) RETURN 
BJZSHIFT 
c) COMMODORE (C—) 


. Adott az alábbi program: 


10 INPUT"KÉREK EGY SZÁMOT";A 
20 PRINT"AZ";A;"SZÁMOT ADTA BE" 


Melyik utasítás nem jelez ki egy sort sem a képernyőn? 
a) FINDA 


B) FIND A 
c) FIND"A 
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3. FEJEZET 
Hibakezelés 


Bármilyen jól programoz is valaki, a kész programok átvizsgálására és hibajavításra 
mindig szükség lesz. Milyen hibakezelési lehetőségeket nyújt a C64-es alapváltozata? 
Két módozatot különböztetünk meg: külső és belső hibakezelést. 

Külső eljárás például a programszakadást követő változó-kijelzés, vagy az interpreter 
által hibásnak ítélt sor kilistázása. 

A belső eljárást olyan utasítások jelentik, amelyek ugyan a programban helyezkednek 
el, de nem képezik annak szerves részét. Ezeket a hibaellenőrzés végén töröljük, vagy 
REM-ekkel hatástalanítjuk. 

A €64-es összesen egy utasítással rendelkezik a belső hibakezeléshez. Ez a STOP. 
Funkciója és felhasználási lehetőségei alig ismertek. A programban ahhoz a részhez 
iktatjuk be, ahol véleményünk szerint céiszerű lehet a program megszakításával egy 
időben a változók ellenőrzése. Amikor a programfutás a STOP-hoz ér, a képernyőn 
megjelenik a "BREAK IN..." kijelzés. Ilyenkor a változók pillanatnyi értékeire rákérdez- 
hetünk (pl.: PRINT A$), majd CONT-tal folytathatjuk a programot egy újabb STOP-ig, ill. 
a program végéig. B 

Figyelmeztetés! A program nem folytatható a CONT-tal, ha a szakadáskor valamelyik 
programsort megváltoztatjuk. Ilyenkor a változók is törlődnek és az alábbi hibaüzenetet 
kapjuk: 


?7CANT CONTINUE ERROR 
A változókat azonban tetszés szerint módosíthatjuk. Például hozzárendelhetünk egy 
változóhoz valamilyen ellenőrzőértéket, majd CONT-tal folytathatjuk a programot. 
A C64-es más, hibakezelési utasítással nem rendelkezik, ezért minden további eljárást 
a programozónak kell kidolgoznia. A program ellenőrzése után azonban ezeket a sorokat 
hatástalanítani kell. Bizonyára csodálkozna az általunk készített program felhasználója, 
ha a program futása közben egyszer csak megjelenne a , BREAK IN 1220" üzenet a 
képernyőn. Érdemes tehát feljegyezni a hibakereső sorokat, hogy a végén könnyen 
megtaláljuk azokat. 
Az eredeti STOP és CONT utasításokon túl a SIMON s BASIC néhány újabb utasítással 
könnyíti a hibakezelést. A következőkben ezeket mutatjuk be. 


3.1 Külső hibakezelés 


3.1.1 TRACE — a programfutás kijelzése 
Formátum:  TRACEn 
Paraméterek: n — bekapcsoláskor értéke 10, kikapcsoiáskor ettől eltérő 
Funkció: A képernyő jobb felső sarkában kijelzi a legutóbb feldolgozott sorokat 
Példa: TRACE 10 

Bekapcsolja a TRACE üzemmódot. 
Ez az utasítás a hibakezelés egyik közkedvelt eszköze. Egyes BASIC interpreterek (pl. 
MICROSOFT-MBASIC), már hardver szinten tartalmazzák ezt a lehetőséget. 
A SIMONSss BASIC bírtokában egy lehetőség a C654-es használóinak is rendelkezésére áll. 
Működése rendkívül egyszerű. A program indítása előtt a TRACE 10 utasítással aktivizál- 
juk a TRACE-üzemmódot, amelynek eredményeként a programfutás során a képernyő 
jobb felső sarkában megjelenő "ablak"-ban látható a legutóbb feldolgozott 6 sor első 6 
karaktere. A programfutás így egy kicsit ielassul, mert az interpreternek a főprogramon 
kívül a TRACE-programot is fel keli dolgoznia. 
A lemezről betölthető TRACE című programon tanulmányozhatjuk az utasítást: 
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P.9 

1 REM $ikérttkkkk kk 

2 REMXETRALCLEGx 

3 REM $ikkkdkkkek dem 

5 FRINT CHR3(1475; 

19 PRINT CHR$(192:"18":GETX$:IFX$z"" THEN1A 

28 FRINT CHR$C1592; "28" :GETXE:IFX$-"" THENZO 

38 PRINT CHR$C192;5"394":GETX$: IFX$-"" THEN39 

48 PRINT CHE$(192; "49" :GETXS$ : IFX$z"" THEN49 

58 PRINT CHR3(1925"54":GETXS: IFxX$z"" THENS9 

68 END 
A CHR$(147) és a CHR$(19) kódok a CLR/HOME és a HOME speciális karaktereket 
jelentik. 
Mielőtt a programot elindítanánk, aktivizáljuk a TRACE utasítást. Az ablak utolsó sora 
mutatja a legutoljára feldolgozott 5. sort. A 10. sorban levő PRINT-et a gép már végrehaj- 
totta, de a sor folytatásához le kell nyomnunk egy gombot. Ekkor az ablakban megjelenik 
a 10. sor is. A további sorok esetében ugyanígy kell eljárni, míg a program végére nem 
érünk. 
Ekkor az ablak tartalma a következő: 

45 

10 

420 

130 

140 

450 
Mivel a program befejeződött, a 60. sor végrehajtását a gép már nem jelzi ki. 
Kapcsoljuk ki a TRACE O-val a TRACE üzemmódot, majd ellenőrizzük RUN-nal, hogy a 
kikapcsolás megtörtént-e. 
Néhány dologra ennél az utasításnál is figyelnünk kell. Kapcsoljuk vissza a TRACE 
üzemmódot, indítsuk el a programot, majd rögtön szakítsuk meg a RUN/STOP-pal. 
A képernyőn megjelenik a "BREAK IN 10" üzenet. 
Ha most az aktuális 5. sorba beírunk egy LIST utasítást, a gép SYNTAX ERROR-ral 
válaszol. Mi lehet ennek az oka? A válasz egyszerű. Az 5. sor végébe belenyúlik a 
TRACE-ablak, amelyet az interpreter a LIST utasítás részeként értelmez. Ez okozza a 
hibát. Kiküszöbölése kézenfekvő: az utasítás beírása előtt a kurzort néhány sorral lejjebb 
kell vinni. 
Ez az utasítás nem teszi lehetővé a program sorról sorra történő végrehajtását ("single- 
step"), valamint a sorok az ablakban nagyon gyorsan futnak. Emiatt a program ellenőrzé- 
se eléggé nehézkes. Megkönnyítésére ajánlatos a programba késleltető cilusokat iktatni, 
vagy alkalmazni a PAUSE nevű SIMON ss BASIC utasítást. A PAUSE 1 például 1 másod- 
perces késleltetést jelent. A végleges programból ezeket törölnünk kell, így a helyüket 
feltétlenül jegyezzük fel! 


3.1.2 RETRACE - az utolsó TRACE-ablak kijelzése 


Formátum: . RETRACE 
Paraméterek: — 
Funkció: Ha töröljük a képernyőt, ezzel az utasítással visszahozhatjuk az utolsó 
TRACE-ablakot 

Az előző pontban már láttuk, hogy TRACE-üzemmódban a képernyő első 6 sorába nem 
írhatunk utasítást, csak akkor, ha előbb töröltük a képernyőt. Ilyenkor természetesen a 
TRACE-ablak is eltűnik. Ha a későbbiek során mégis kíváncsiak vagyunk a legutolsó 
TRACE-sorokra, ezzel az utasítással újra megjeleníthetjük. 
Hívjuk be most a lemezről a RETRACE-programot és próbáljuk ki a működését: 
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P. 10 


1 REM Mékdekedéddede teeak ek kek 

2 REMXRETRACEGR 

3. REM deededeétek tek ek teetkk kk 

5 PRINT CHR$(14729; 

10 FÜR I51 TŰ 18 

29 FRINT I 

39 NET 

44 PRINT CHR$(1477 
Kapcsoljuk be a TRACE üzemmódot (TRACE 10), majd futtassuk le a programot. Az utolsó 
sor törli a képernyőt, eltűnt tehát a TRACE-ablak is. Írjuk be a RETRACE utasítást. Az 
ablak tartalma a következő lesz: 

420 

430 A 

H20 

H30 

H20 

$30 
Ebből láthatjuk, hogy a tulajdonképpeni ciklus a 20. és a 30. sorban van, az 5., 10. és 40. 
sor csak egyszer futott le. 


3.1.3 DUMP - változók kijelzése 


Formátum: DUMP 


Paraméterek: — 
Funkció: A program összes változóját pillanatnyi értékükkel együtt kijelzi 
Megjegyzés: Negatív számok és üres füzérek problémát okozhatnak. 


A program ellenőrzése során hasznos lehet az alkalmazott változók pillanatnyi értékei- 
nek figyelemmel kísérése. Ezek kijelzésére a PRINT-utasítás is alkalmas, de hátránya az, 
hogy a változókra csak egyenként tudunk rákérdezni. A DUMP-utasítás lehetővé teszi, 
hogy az összes változót, aktuális értékével együtt a képernyőn listaszerűen kiírathassuk. 
A listázás — hasonlóan a LIST-utasításhoz — a CTRL-billentyűvel késleltethető. 

Ezek alapján első ránézésre nagyon kényelmesnek tűnik a DUMP-utasítás, de pozitív 
benyomásainkat néhány hiányossága mégis elrontja. 


. Nem jelzi ki a tömböket (pl. A(23) vagy A$(2). 

. A negatív számokat pozitívként jelzi ki. 

. A negatív egész-változókhoz (pl. A90) hozzáadja a 2116 értéket. 

. A határozatlan üres füzéreket (pl. A$-" ") feltölti 256 határozatlan karakterrel. 


RONDA 


Ezek az utasítás súlyos hiányosságai, ezért csak pozitív változók és definiált füzérek 
esetében használható megbízhatóan. 
Írjuk be például a következő sort közvetlen üzemmódban, azaz sorszám nélkül: 
- 10:B — —5:C 99— — 57:D$— "5" 
Mielőtt a DUMP-ot beírjuk, üljünk le, mert az eredmény eléggé meghökkentő lesz: 
A-—10 
B-5 
C9o — 65479 
D$-" ???... 77?" (256 db kérdőjel!) 
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Csak az A változót kaptuk vissza helyesen. Jobb tehát, ha most mégiscsak a PRINT-et 
használjuk: 


PRINT A, B.C99,D$ 
Így hibátlan eredményt kaptunk: 
10 5) SZEÖLl Es 
Az üres füzéreket ez az utasítás sem jelzi ki. 
Ne húzzuk ki azért a DUMP utasítást se a könyvből, hiszen ha szem előtt tartjuk az említett 
hiányosságokat, korlátozottan bizonyos esetekben hasznunkra lehet. Különben is, egy 


olyan átfogó programbővítés esetében, mint amilyen a SIMONss BASIC, az efféle hibákat 
megbocsáthatjuk. 


3.1.4 COLD - visszatérés alapállapotba 


Formátum: COLD 
Paraméterek: — 
Funkció: A SIMON s BASIC-et alapállapotba hozza 


Ha a C64-et SIMON s BASIC nélkül alapállapotba kívánjuk hozni, a SYS 64738-at kell 
beírnunk. Ugyanez az utasítás SIMON s BASIC-kel a SIMON s BASIC betöltését követő 
állapotot eredményezi. Ez az utasítás elég nehezen jegyezhető meg, ill. könnyen elfelejt- 
hető, ezért sokkal egyszerűbb a COLD-utasítás alkalmazása, amely hatását tekintve 
ugyanaz. 

Felhasználása előtt ne felejtsük el, hogy a tárban lévő programot törli és az összes 
változót nullázza. Nevezhetnénk ezt "hidegindítás"-nak, de valójában sem a SYS 64738- 
cal, sem pedig a COLD utasítással nem hajtunk végre valódi "hidegindítás"-t, hiszen ez 
alatt azt értjük, hogy a tároló minden címe nullázódik. Nos, itt erről szó sincs, hanem csak 
annyi történik, hogy a program kezdetét és végét jelző BASIC mutatók visszakerülnek 
eredeti állapotukba. Mivel nem törlődik az egész tár, inkább csak "melegindítás"-ról 
beszélhetünk. A Commodore 64-esnél valódi "hidegindítás"-t csak a gép ki- ill. bekapcso- 
lása jelent. 


3.1.5 OLD - a törölt program felélesztése 


Formátum: "OLD 
Paraméterek: — 
Funkció: Visszahozza (regenerálja) a NEW-val vagy COLD-dal törölt programot 


Ha véletlenül beírtunk egy NEW- vagy COLD-parancsot, amelyek az egész BASIC progra- 
mot törlik, újra feléleszthetjük azt egy OLD utasítással. Próbáljuk ki a következő progra- 
mon: 

1 REM öökökökökökökökök kö 

2 REM r OLD 

3 REM tek tötökökökökökökök 
Írjuk be, majd NEW-val töröljük. LIST-tel győződjünk meg arról, hogy a törlés valóban 
megtörtént-e. Az OLD beírása után ismét listáztassuk. Láthatjuk, hogy a program újra a 
tárban van. A kísérletet a COLD-dal is megismételhetjük és tapasztalni fogjuk, hogy az 
OLD ugyanúgy működik, mint az előző esetben. 


Figyelmeztetés! Az utasítás csak addig funkcionál, míg a NEW-t vagy COLD-ot követő- 
en nem vittünk be új BASIC sorokat, valamint módosítást, vagy törlést nem végeztünk. 
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3.1.6 Ellenőrző kérdések 
1. Melyik utasítás aktivizálja a TRACE üzemmódot? 
a) TRACE 
b) TRACE 0 
cCÖYTRACE 10 
d) RETRACE 
2. Melyik utasítás hozza vissza az utolsó TRACE-ablakot? 
a) TRACE 
b) TRACE 0 
c) TRACE 10 
d) RETRACE 
3. Mi a DUMP utasítás hatása? 


, 
(a), Kijelzi a programban előforduló változókat. 7177 
(b) Kijelzi a programban előforduló változók tartalmát. 


4. Melyik utasítás jelenti a CBM 64 "hidegindítás"-át? 
a) COLD 
b) OLD 
c) NEW 
5. Melyik utasítás hozza vissza a törölt BASIC programot? 
a) COLD 


.5b) OLD 
c) NEW 
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3.2 Belső hibakezelés 


Belső hibakezelésre azért van szükség, hogy a program futása közben fellépő hibákat 
korrigálhassuk és ezzel a program összeomlását megakadályozzuk. Erre a SIMON s 
BASIC kényelmes megoldásokat kínál. Akár SYNTAX ERROR-ról, akár DEVICE NOT 
PRESENT ERROR-ról van szó, a hiba a programon belül kezelhető és egyedi hibaüzenet 
formájában kijelezhető. 

A következő pontokban ezekről a hatékony módszerekről lesz szó. 


3.2.1 ON ERROR - hibaellenőrzés a programon belül 


Formátum: ON ERROR:GOTO uc 

Paraméterek: uc — A GOTO utasítás ugrócíme 

Funkció: A hibaellenőrzés áthárítása a programra 

Példa: ON ERROR : GOTO 1000 
Ha a programfutás közben valamilyen hiba felmerül, a program az 1000. 
sorban folytatódik. 


Az utasítás a hiba számát az ERRN, a hibás sor számát pedig az 
ERRLN változókban tárolja. 


Megjegyzés: 


Egy jól szervezett és jól megírt program semmilyen körülmények közt nem omolhat 
össze. Ez elérhető a felhasználó által beadott értékek rendszeres ellenőrzésével. Ha pl. 
le akarjuk hívni egy tömb 120. elemét, amelyet csak 100 elemre dimenzionáltunk, ezt a 
programnak fel kell ismernie és jeleznie kell, mert különben a program a "?BAD SUB- 
SCRIPT ERROR IN..." hibaüzenettel befejeződik. 

Nem minden hibát lehet kiküszöbölni a programból. Vegyük például, hogy adatokat 
akarunk rögzíteni a mágneslemezen, de nem csatlakoztattuk a meghajtóegységet. Az 
első adatátviteli kísérletkor meg fog jelenni a "?DEVICE NOT PRESENT ERROR IN..." 
hibaüzenet. Programtechnikailag lehetetlen megállapítani, hogy valamelyik készüléket 
csatlakoztattuk-e. Ebben és még sok más hibaforrás felderítésében is segítségünkre van 
a SIMON s BASIC. 


A SIMON ss BASIC által felismerhető hibákat és azok számait a következő táblázatban 
foglaltuk össze: 


Hiba szám " Hiba 
1 TOO MANY FILES (Túl sok file) 
2 FILE OPEN (A file nyitva van) 
3 FILE NOT OPEN (A file nincs nyitva) 
4 FILE NOT FOUND (A file nem található) 
5 DEVICE NOT PRESENT (A készülék nincs csatlakoztat- 


va) 


10 NEXT WITHOUT FOR (NEXT, FOR nélkül) 

11 SYNTAX (Szintaktikai hiba) 

12 RETURN WITHOUT GOSUB (RETURN, GOSUB nélkül) 

13 OUT OF DATA (Nincs adat) 

14 ILLEGAL OUANTITY (Nem megengedett mennyi- 
ség) 

15 OWERFLOW (Túlcsordulás) 

16 OUT OF MEMORY (A tár betelt) 

17 UNDEFINDED STATMENT (Meghatározatlan állapot) 

18 BAD SUBSCRIPT (Rossz index) 
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19 RE-DIMENSIONED ARRAY (Újra dimenzionált tömb) 


20 DIVISION BY ZERO (Osztás nullával) 

21 ILLEGAL DIRECT (Direkt üzemmód tilos) 

22 TYPE MISMATCH (Nem azonos típusú mennyi- 
ség) 

23 STRING TOO LONG (Túl hosszú füzér) 


A meghajtóegység hibaüzenetei közül azonban egyik sem ismerhető fel az ON ERROR- 
ral. Ezeket az adott helyen a lemezegység-hibacsatorna kiolvasásával kell analizálni. 
Erről bővebbet a "AVC 1541-es lemezegység programozása"" című DATA BECKER- 
NOVOTRADE könyvben találhatunk. 3 


Az ON ERROR utasítás: 


Ezt az utasítást a programnak azon a részén helyezzük el, ahol a hibavizsgálatot a 
programnak át kell adni. Ha tehát el akarja végezni az egész program hibaellenőrzését, 
akkor az ON ERROR utasítást az első sorban kell elhelyezni. Egy program sem lehet 
azonban olyan bizonytalan, hogy ez szükséges lenne. Célszerű csak olyan hibák kiszűré- 
sére alkalmazni, amelyek programtechnikailag nem elkerülhetők. A DEVICE NOT PRE- 
SENT hibaüzenet kiadását például a programozó nem tudja megakadályozni. Ilyenkor 
hasznos az ON ERROR utasítás alkalmazása, amely lehetővé teszi, hogy a felhasználó 
a programfutás megszakadása nélkül kijavíthassa a hibát. 

Az ON ERROR alkalmazásakor kiértékelő rutinokat alkalmazunk, ahol a program a hiba 
felléptekor folytatódik, majd a hiba korrigálása után visszatér a főprogramba. 


Pl.: 10 ON ERROR:GOTO 10000 
(A kiértékelő rutin a 10000. sorban kezdődik.) 


Az ON ERROR utasítás közvetlen üzemmódban nem használható, mivel ezáltal megszű- 
nik a számítógép parancsellenőrző funkciója. Ilyenkor a számítógép a beírás után meg- 
akad és csak egy RUN/STOP-pal és az ezt követő NO ERROR utasítással hozható 
alapállapotba. 

Az ON ERROR utasítás párja a NO ERROR, tehát most ezzel fogunk megismerkedni. 
Részletes tárgyalásukra a 3.2.3. pontban kerül sor. 


3.2.2 NO ERROR - ON ERROR kikapcsolása 


Formátum: NO ERROR 
Paraméterek: — 
Funkció: A hibaellenőrzést újra a standard BASIC veszi át 


A kézikönyvben leírtaktól eltérően ez az utasítás nem elnyomja a hibaüzeneteket, hanem 
az ON ERROR-ral átvett hibaellenőrzést visszaadja a standard BASIC-nek. Az ON ER- 
ROR-ral végzett hibavizsgálat végén, vagy ha a programot RUN/STOP-pal megszakítot- 
tuk, mindig kapcsoljunk vissza a standard hibavizsgálatra a NO ERROR-ral, különben 
meglepő dolgokat fogunk tapasztalni. Előfordul, hogy ilyenkor a SIMON s BASIC teljesen 
"megbolondul". 

Legcélszerűbb az ON ERROR-tt a programon kívül hatástalanítani, nehogy az az értelmet- 
len helyzet álljon elő, hogy egy utasítás — pl. LIST — beírására a számítógép a programunk 
hibarutinjára ugrik és a közvetlen üzemmódot (READY) csak a RUN/STOP-pal állíthatjuk 
vissza. 


" Eredeti címe: Das groBe Floppybuch (1983) 
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3.2.3 ON ERROR/NO ERROR - példák 
Ebben a pontban részletesen ismertetjük, hogy hogyan kell alkalmazni! a programban az 
ON ERROR/NO ERROR utasításokat, az ERRN és ERRLN változókat, milyen fontos 
szabályokat kell betartanunk, valamint, hogy a helytelen aikalmazásból milyen káros 
következmények származhatnak. 
Igaz, hogy az ON ERROR-t csak ott kell használni, ahol egyéb hibakezelésre nincs mód, 
a következő példában mégis az egész program hibavizsgálatát ezzel végezzük, hogy 
minden lehetőségét bemutathassuk. 

P. 11 

1 REM KEKREKKEKERKEK EE Ete okk 

2 REMXKLON ERRÜR hü 

3 REM ségegesededeaket tetek de stee ee eke ake se 

40 ON ERROR:G0TÜ 199980 

59 PRINT" TESZT KEZDETE " 

68 PRINT:" START " 

78 PRINT CHR$(2562 

8a Az1O:A$-"29" 

98 PRINT AitA$ 

199 X$£(112-" TESZT VEGE " 

119 PRINT X$(112? 

129 NO ERROR:END 

19998 REM $édedégedeek lesed teje ie sekök 

19019 REM kk HIBAVIZSGRLAT ik 

19828 REM BENENEHEKEE NEEE kette aé keze akk 

199309 PRINT"A HIBA SZAMA: "ERRN "; A HIBAS SOR: "ERRLN 

190940 PRINT"UGRAS A" ERRLN$19". SORBA" 

19959 CGOTO (ERRLN418? 


Ahhoz, hogy a teljes program hibavizsgálatát az ON ERROR-ral végezhessük, azt a 

program elején, esetünkben a 40. sorban kellett elhelyezni. Ennek a sornak a hatására 
. minden hibafelismeréskor a program a 10000. sorba ugrik. A program többi része hibás 

sorokból, valamint a 10000. sorral kezdődő HIBAVIZSGALAT-alprogramból áll. 

Indítsuk el a RUN-nal a programot: 

A képernyőn megjelenik a következő kijelzés: 


TESZT KEZDETE 

A HIBA SZÁMA: 11; A HIBÁS SOR:60 
UGRÁS A 70. SORBA 

A HIBA SZÁMA: 14; A HIBÁS SOR: 70 
UGRÁS A 80. SORBA 

A HIBA SZÁMA: 22; A HIBÁS SOR: 90 
UGRÁS A 100. SORBA: 

A HIBA SZÁMA: 18; A HIBÁS SOR 100 
UGRÁS A 110. SORBA 

A HIBA SZÁMA: 18; A HIBÁS SOR: 110 
UGRÁS A 120. SORBA 


Vizsgáljuk most meg tüzetesen a programunkat. 
A hibatáblázat alapján nézzük meg, melyek is a kijelzett hibák: 


- A 60. sorban 11-es számú, azaz szintaktikai hiba van, amit az idézőjel előtt szereplő 
kettőspont okoz. 

-— A 70. sorban a 14-es számú, azaz nem megengedett mennyiség hiba jelentkezik: . 
(CHR$(256)). 

-— A 90. sorban 22-es számú, azaz a nem azonos típusú változók okozta hibát találhatunk 
(At A$). 

-— A 100. és 110. sor 18-as, azaz rossz index okozta a hibát: (X$(11)). 


Nézzük meg, mivel értük el azt, hogy a program a hibák ellenére tovább futott, azaz a 
hibarutin feldolgozása után mindig visszatért a következő programsorra. 37 


Látjuk, hogy a hiba száma és a hibás sor száma egy-egy változóba kerül (ERRN és 
ERRLN). A főprogramba való visszatéréshez az utóbbit használjuk fel. Mivel a sorszámo- 
zás szabályosan, 10-esével növekszik, lehetőségünk van arra, hogy a hibás sort követő 
sor számát kiszámítsuk, a következő egyszerű képlet szerint: 

következő végrehajtandó sor — ERRLN tt 10. 


Mondhatnánk erre azt, hogy mindez szép, de a GOTO utasítás csak egy előre meghatáro- 
zott sorszámot tud elfogadni, ilyen kiszámított ugrócímet nem. Szerencsére a SIMON s 
BASIC-ben erre is találunk megoldást, ez pedig a CGOTO-utasítás. Ez ugrócímként 
változót és matematikai kifejezést is megenged. Érthetővé vált tehát az 10050. sor 
tartalma, ami a hibás sor számából kiszámítja a következő végrehajtandó sor számát, 
és CGOTO-val odaküldi a programot ezzel a végrehajtás folytatódhat. 


A programunk továbbfejlesztése az lehet, ha megoldjuk a hibák szöveges kiírását. Nem 
várhatjuk el ugyanis senkitől, hogy a hibatáblázatot fejben tartsa, enélkül viszont mindig 
vissza kell lapoznia. Ez nem elegáns megoldás, sokkal kedvezőbb, ha a képernyőn 
rögtön olvashatjuk a hiba jellegét is. 

Nézzük a következő példát! 


P. 12 
1 REM delegeaetedeskst: teeedesk zek ee lekeke 
2 REMK2ON ERROR xx 
3 REM SEereséeesje ges fee ke azek ese ae aka 
38 G0SUB 29999 
48 ON ERROR :GOTO 109908 
599 PRINT" TESZT KEZDETE " 
. EB PRINT:" START " 
78 PRINT CHR$C256€? 
ge A-10:A$z"29" 
98 PRINT AtA$ . 
108 X$(112-" TESZT VEGE " 
110 PRINT X$(112 
128 NO ERROR :END 
19998 REM stledetetertetetedek 4 eakesesenkeik 
19919 REM k HIBAVIZSGALAT ik 
19829 REM HENENEajEE ke ájeát le eakak ak ae kök 
199389 PRINT FE$(ERRN)" A"ERRLN" . SORBAN" 
19048 PRINT"UGRAS A" ERRLN$H19".SORBA" 
109509 CGOTO (CERRLN-H19? 
20908 REM Viáestetesjeneezedesk akeajokestenkeök 
260910 REM $ HIBATABLAZAT 3 
20020 REM ötátttezjeeteske testes akát zkeseseske 
20038 DIM FE$C23. 
20048 RERD I.I$ 
. 202050 IF IO THEN RETURN 
20060 FE$(I2-I$ 
28978 GOTO 200408 
20038 DATAL, "TUL SOK A FILE" 
290908 DATAZ,"A FILE NYITVA VAN" 
29199 DATA3,"A FILE NINCS NYITVA" 
20119 DATA4. "A FILE NEM TALALHATO" 
29129 DRTRS. "A KESZULEK NINCS CSATLAKOZTRTYA" 
20139 DATRIAR."NEXT:; FOR NELKUL" 
20148 DATR11. "SZINTAKTISAI HIBA" 
28158 DRTRA12.: "RETURN. GOSUB NELKÜL" 
291698 DATHIZ3."KEVES AZ ADAT" 
20178 DATR14, "ILLEGALIS MENNYISEG" 
209198 DATRIS. "TULCSOROULAS" 
29199 DRTA16. "KICSI A TARKAPRCITAS" 
29200 DATRI7, "MEGHATAROZATLAN ALLAPOT" 
20218 DRTHR1I8. "ROSSZ IMDEX" 
24220 DATAIS, "A TÖMB MAR DIMHENZIONALT" 
24238 DHR:;HR2O. "OSZTRAS A-VAL" 


29240 DATRAZI, "DIREKT UZEMMOD TILOS" 
28250 NATAZ2: "A VALTOZÓ TIP. HIBAS" 
209268 DATAZ23."A STRING TUL HOSSZU" 
20270 DATAXR, "VEGE" 


A 2.ON ERROR program tanulmányozása során meggyőződhetünk arról, hogy a hibaszá- 
mokhoz tetszőleges szöveg rendelhető, így részletesebb hibaüzeneteket is készíthetünk. 
Töltsük be tehát a programot és indítsuk el. Néhány szó a változásokról. A 30. sorban 
lehívunk egy alprogramot, amely a hibatáblázatot beolvassa egy tömbbe. Ez az FE$(23) 
tömb, amelynek indexei egyben a hibaszámok is. Tehát a 11-es számú hiba szövege az 
FE$(11) stringben van (20030 sor). A 20040 sor kiolvassa a DATA-sorokból a hibák számait 
és a hozzátartozó szövegeket. Ha a végére ért, azaz 1— 0, a 20050. sor utasítása szerint 
RETURN-nel visszatér a főprogramba. 

A program futási eredménye a képernyőn a következőképpen fog megjelenni: 


TESZT KEZDETE 

SZINTAKTIKAI HIBA A 60. SORBAN 
UGRÁS A 70. SORBA 

ILLEGÁLIS MENNYISÉG A 80. SORBAN 
UGRÁS A 90. SORBA 

A VÁLTOZÓ TIP.HIBÁS A 90. SORBAN 
UGRÁS A 100. SORBA 

ROSSZ INDEX A 100. SORBAN 
UGRÁS A 110. SORBA 

ROSSZ INDEX A 110. SORBAN 
UGRÁS A 120. SORBA 


A programkészítés során komoly segítséget jelent egy ilyen hibafeldolgozási lehetőség. 
A megjelenítés a képernyőn gyakran szükségtelen, sőt zavaró is lehet. Sokkal jobb 
megoldás a hibaüzeneteket nyomtatón megjeleníteni, ill. file-ba "összegyűjteni", így a 
képernyő szabadon marad. Ehhez a következő módosításokat kell elvégeznünk. 


Hibalista készítése a nyomtatón: 

- A program elején megnyitjuk a nyomtatócsatornát: 
10 OPEN 1,4 

— Módosítjuk a 10030. és 10040. sorokat: 
10030 PRINT$1, FE$ (ERRN)"A"TERRLN". SORBAN" 
10040 PRINT$1, "UGRÁS A"ERRLN -- 107.SORBA" 

- A program végén lezárjuk a nyomtatócsatornát: 
120 NO ERROR:CLOSE 1: END 


A hibák összegyűjtése egy file-ban: 
-— A program elején megnyitjuk a file-t írásra: 
10 OPEN 1,8,2"HIBA-FILE, SW" 
— Az előzőek szerint módosítjuk a 10030. és a 10040. sort 
Lezárjuk a file-t 


A program futása után rendelkezésünkre áll egy lista a nyomtatón vagy a lemezen, a 
programban található hibákról. A file-ban tárolt hibalista a következő programmal íratha- 
tó ki a képernyőre: 

10 OPEN 1,8,2 "HIBA-FILE,S,R" 

20 GET// 1,X$ 

30 PRINT X$; 

40IFST —€ 5 64 THEN 20 

50 CLOSE 1 39 


Ez a program megnyitja olvasásra a soros hibafile-t, majd byte-onként beolvassa és kiírja 
a képernyőre a tartalmát. A file végét a státuszváltozó (ST— 64) jelzi. 
Megismerkedtünk tehát a professzionális hibaelemzés összes módszerével. Éljünk minél 
gyakrabban ezzel a SIMON s BASIC nyújtotta kitűnő lehetőséggel." 


3.2.4 OUT 


Logikailag most az OUT utasítás bemutatása következne, de a birtokunkban lévő SI- 
MON s BASIC lemezen ez nem működött. Emiatt olvasóink érdekében nem foglalkozunk 
vele. A kézikönyvben leírtak különben is teljesen ráillenek a NO ERROR-ra. Programban 
úgy működik, mint az END, közvetlen üzemmódban pedig a gép által utoljára kiadott 
üzenetet hozza vissza. Ha például a programindítás "?SYNTAX ERROR"-t eredményez, 
akkor az utána kiadott OUT is ezt jelzi ki. Ez az utasítás tehát használhatatlan! 


" (Ebben a fejezetben nem ragaszkodtunk a könyv eredeti szerkezetéhez, amelyet a programok 
lemezrevitele indokol. — A magyar változat készítői.) 
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3.2.5 Ellenőrző kérdések 


1. A hibaellenőrzést át kell adni a programnak. Ha a hibarutin az 1000. sorban kezdődik, 
melyik utasítással oldható ez meg? 


a) ON ERROR:GOTO 1000 
b) ON ERROR;GOTO 1000 
c) ON ERROR, GOTO 1000 
d) ON ERROR GOTO 1000 


2. Az ON ERROR utasítás melyik változónak adja át a hibaszámot: 


a) ER 

b) EN 
c) ERN 
d)! ERRN 


3. Melyik változó veszi át a hibás sorszámot? 


a) ERRLINE 
b) ERLN 
c) ERRLN 
d) ERL 


4. Melyik utasítás adja vissza a hibaellenőrzést a standard BASIC-nek? 


a) OUT ERROR 
b) NO ERROR 
c) OFF ERROR 


5. A következő hibaüzenetek közül melyik az, amelyet ON ERROR-ral nem tudunk kije- 
lezni? 


a) OUT OF MEMORY ERROR 
b) OUT OF DATA ERROR 
c) LDAD ERROR 


a 
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4. FEJEZET 
Programvédelem 


4.1 DISAPA - a védeni kívánt sorok megjelölése 


Formátum: — DISAPA 

Paraméterek: — 

Funkció: Megjelöli a SECURE 0-val védeni kívánt sorokat 

Minden olyan sort, amelyet SECURE 0-val védeni akarunk, DISAPA utasítással kell 
kezdeni. 

Hívjuk be a lemezről a DISAPA-programot: 


P. 13 


1 REM deeledeséákeak ak esetek ak esek 

2 REMk DISAPAGkHx 

3 REM segedenetetededenkezkeok kak ke 4eik 

10 INPUT"KEREM A PROGRAMKODOT";A$ 
20 IF A$-"R12B13" THEN 49 

89 PRINT"A KOD NEM HELYES! ":GOTO 19 
48 PRINT"A KOD HELYES!" 


Tegyük fel, hogy a program 20. sorát védeni akarjuk, tehát a sorban az első utasítás a 
DISAPA lesz. 


20 DISAPA:IF A$-—"A12B13" THEN 40 


Ha most kílistázzuk a programot, láthatjuk, hogy a DISAPA utasítás a 20. sort négy 
kettősponttal megjelölte. 


P. 14 


1 REPI sésesesenegtete tettesek se enként 

2 REM$ DISAPAKRK 

3 REM sejeedküesegejemesezlezk jjegezeste 

19. INPUT"KEREM A PROGRAMKODOT";RA$ 

29 DISAPA: : : : : IF A$-"A12B13" THEN 49 
30 PRINT"A KOD NEM HELYES!" :GOTO 19 
46 PRINT"A KOD HELYES!" 


A teljes program védelmét úgy valósíthatjuk meg, ha minden sor elejére kitesszük a 
DISAPA utasítást, de ez meglehetősen kényelmetlen megoldás. Rendeltetése nem is ez, 
hanem, hogy a fontosabb sorok, pl. amelyekben másolás elleni védelem van, a program- 
listában ne szerepeljenek. A megjelölt sorok a következő utasítással védhetők. 


4.2 SECURE - a sorok védelme 


Formátum: SECURE 0 
Paraméterek: — 
Funkció: A DISAPA-utasítással megjelölt sort védi 


Ezt az utasítást mindig közvetlen üzemmódban használjuk, a programban DISAPA-val 
megjelölt sorok védelmére. Az előbb megjelöltük a DISAPA-program 20. sorát: 
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Pp. 15 


1 REM dedtté e dededegeeteek kk kk 

2REMXk DISAPAR 

3 REM selédégegedetkáeskak teezk deák 

18 INFUT"KEREM A PROGRAMKCODOT" ; A$ 

28 DISAPR: : : : : IF A$-"R12B13" THEN 49 
.38 PRINT"A KOD NEM HELYES! ":GOTO 198 
48 PRINT"A KOD HELYES!" 


Írjuk be most a SECURE 0 utasítást és listáztassuk ki újból a programot. Azt tapasztaljuk, 
hogy a 20. sor tartalma nem jelenik meg a képernyőn. 


P. 16 


1 REM seseakeedeseee tételezek tek 
2REMXk DISAPAGWHR 
3 REM Sédetesesesemeneneee deal akk 
19 INPUT"KEREM AR PROGRAMKODOT" ;A$ 


20 
39 PRINT"A KON NEM HELYES! ":GOTO 19 
49 PRINT"A KOD HELYES!" 


A módszer egyetlen hátránya, ami ebben az esetben végül is előny, hogy a 20. sort 
ezután már nem hozhatjuk vissza. Igaz, hogy nem is volna értelme olyan védelemnek, 
amely bármikor feloldható. A védett sorokkal ezután már a törlésen kívül semmit sem 
csinálhatunk. Ajánlatos tehát a programokból védelem nélküli másolatot készíteni, hogy 
abba a későbbiek során még beavatkozhassunk. 

Jogos a kérdés: hogy létezik az, hogy egy sor eltűnik, de mégis létezik? Nos, ez viszony- 
lag egyszerű trükk. A DISAPA-sor elejére egy nulla-byte kerül, amelyet négy kettőspont 
követ. A nullabyte hatására a sor a listából kimarad, de a kettőspontok miatt mégis 
feldolgozásra kerül. 

Bemutathatnánk azt a programot, amellyel az így láthatatlanná tett sorok visszahozhatók, 
de akkor ez az utasítás nem érne semmit. A probléma megoldását átengedjük inkább 
azoknak, akik szívesen törik ilyesmin a fejüket! 


5. FEJEZET 
A strukturált programozás 


Egy program áttekinthetőségét nagymértékben befolyásolja annak szerkezeti felépítése. 
Természetesen a standard BASIC-ben is ajánlatos strukturált programozást megvalósí- 
tani. Célszerű például az alprogramokat (szubrutinokat) a program végén elhelyezni és 
REM-ekkel megjelölni, az egymásba skatulyázott programrészeket érdemes a sorok 
elején elhelyezett kettőspontokkal vagy szünetekkel kiemelni stb. 

Az alábbi programrészlete egy FOR...NEXT ciklus kiemelését szemlélteti: 


10 FORI-1TO 10 
20 : : : §4— At 1 
30 : : : PRINT IA 
40 NEXT I 


Egy strukturált IF-lekérdezés szintén áttekinthetőbb: 


10 IF A$— "NYOMTATÁS" THEN GO 

20 : PRINT"NYOMTATÁS NINCS." 

30 : PRINT"KIJELZÉS A KÉPERNYŐN (I/N)?";X$ 

40 : GET X$:IF X$ c 52"I7 AND X$ a 5"N" THEN 40 
50 : IF X$—"I" THEN A$—"KIJELZÉS" 

60 GOSUB 10000 


Sokkal könnyebben felismerhetjük, hogy az IF-lekérdezés NEM-ága mit jelent. A standard 
BASIC-ben a strukturált programozásra kevés lehetőségünk van, de a SIMON ss BASIC 
e területen is számos megoldást kínál. 


5.1 Logikai műveletek 


5.1.1 IF...THEN...ELSE 


Formátum feltétel THEN IGEN-ág: ELSE:NEM-ág 

Paraméterek: feltétel — valamilyen logikai összehasonitítás 
igen-ág — ha a feltétel eredménye logikai IGAZ, a program futása itt 
folytatódik 


nem-ág — ha a feltétel eredménye logikai HAMIS, a program futása 
itt folytatódik 

Példa: IF X$—"N"THEN PRINT"VÉGE":END:ELSE:GOTO 1000 
Azaz, ha X$ értéke "N", írja ki, hogy "VEGE" és fejezze be a progra- 
mot. Ellenkező esetben ugorjon az 1000. sorba. 


Így az IF-feltétel eldöntését az IGEN- és NEM-ággai együtt egyetlen sorba sűríthetjük. 
A következő két programrészleten összehasonlíthatjuk, hogy ugyanazt az IF-vizsgálatát 
hogyan oldhatjuk meg standard BASIC-ben és SIMON s BASIC-ben. 

A feladat a következő: olvassuk be egy karaktert a billentyűzetről. Ha ez ,D", hívjuk le 
az 1000. sorban. ha , B", a 2000. sorban kezdődő alprogramot. 

Standard BASIC-ben ez így néz ki: 


10 GET X$:IF X$ c 5 "DT AND X$ c 5 "B" THEN 16 
20 IF X$—"D" THEN GOSUB 1000 

30 IF 4$—"B" THEN GOSUB 2000 

40 ... 
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vagy 


10 GET X$:IFX$ C 5 "D7T AND X$ c 5"B" THEN 10 
20 IF X$—"D" THEN GOSUB 1000:GOTO 40 

30 GOSUB 2000 

40 ... 


Sokkal elegánsabb a következő megoldás, amelyet a SIMON s BASIC tesz lehetővé 


10 GET X$:IF X$ € 5 "D7T AND X$ c 5 "B" THEN 10 
20 IF X$—"D" THEN GOSUB 1000:ELSE:GOSUB 2000 
30 ... 


Amikor csak tehetjük, alkalmazzuk ezt a módszert! 


5.1.2 RCOMP 

Formátum:  RCOMP:IGEN-ág: ELSE:NEM-ág 

Paraméterek: (az előző ponthoz hasonlóan) 

Funkció: A legutolsó IF...THEN...ELSE feltétel lekérdezése 
Példa: RCOMP END:ELSE:GOTO 1000 


Ez az utasítás a legutóbbi IF... THEN. ..ELSE utasítás feltételére hivatkozik. Akkor alkal- 
mazható előnyösen, ha egy programon belül egymás után többször is le kell kérdezni 
ugyanazt a feltételt. Így valamivel rövidebb formában ugyanazt érhetjük el. 
A példában tehát: ha az előzőleg szereplő IF...THEN...ELSE feltételének eredménye 
most IGAZ, a program befejeződik, ha HAMIS, az 1000. sorban folytatódik. 


Nézzük a következő példaprogramot: 

Az ARTDAT nevű file-ban szereplő cikkek számát hozzá kell rendelnünk a C változóhoz. 
Azon termék szállítójának számát (sz), amelynek cikkszáma 999-nél nagyobb, a 
"CIKK.1000-" a többit a "CIKK.-9997, majd ugyanezen feltétel szerint az árakat (PR) a 
"AR.1000-" és a "AR.-999" elnevezésű file-okban kell gyűjteni. 


PETZ 


199 REM FOPROGRAM 

119 REM Ketoksekolekekik 

120 OPEN 1,8.2, "ARTDAT; S." 

198 INPUTH1, C, SZ, A 

149 IF C2999 THEN GOSUB 1999:ELSE:GOSUB 2800 
159 RCOMP GOSUB 3000:ELSE:GOSUB 4000 
170 IF STCD64 THEN 130 

188 CLOSE 1:END 

1990 REM IRAS A-"CIKK 1988-" FILE-BA 
1205 REM  KéEstültbtse teje delete se KK ee etelt 
1819 (2.2. es 

1928 (sss 

1949 RETURN 

2009 REM IRAS A "CIKK -999" FILE-BA 
2005 REM Átt KOKO MENTENEK HTO KEMETKT E MEIK 
2910 1222 

ZO2B 12. ssss 

2930 RETURN 

3900 REM IRAS FZ "AR 1009-" FILE-BA 
3005. REM SEKEMINÁTA E MEM MEEKE HEHEEKE HEEKEE EK 
SOTO séta 

3028 . 1.5... 

30380 RETURN 

4008 REM IRAS AZ "AR -999" FILE-BA 
4OOS  NTEKEKEENETENE Át ETLJÁTNK BRT ENEK GENEK HENEM 
4010 (2.5. 

4928 ss. s ss 

4036 RETURN 45 


A problémát a következő programmal oldhatjuk meg: 

Ha az RCOMP utasítás nem állna rendelkezésünkre, a 140. sorban meg kellene ismétel- 
nünk a lekérdezést. 

Az RCOMP addig ismételhető, míg újabb IF...THEN...ELSE kapcsolat elő nem fordul. 
Mivel az RCOMP az IF...THEN. . ELSE-ből csak a "feltétel" paramétert használja fel, az 
IGEN- és NEM-ág utasításai eltérőek is lehetnek. 

A program áttekinthetőségét rontja, ha az iF...THEN...ELSE és a hozzátartozó RCOMP 
túl messze esik egymástól, ezért ezt az eljárást csak akkor érdemes alkalmazni, ha . 
megoldható, hogy ezek viszonylag közel kerüljenek egymáshoz. 


5.1.3 REPEAT...UNTIL — ciklusvezérlés 


Formátum: REPEAT: ciklus: UNTIL feltétel 
Paraméterek: ciklus — egy ciklus utasításai 
feltétel — a ciklus végének feltétele 
Funkció: Egy ciklus vezérlése valamilyen feltétellel 
Példa: REPEAT:A — A-t 1:UNTIL A — 10000 
"A" értékét mindaddig növeli 1-gyel, míg el nem éri a 10 000-et. 


Az utasításpár alkalmazásával áttekinthetőbb ciklusokat szervezhetünk, mint ahogy az 
a következő példából is látható: 

P. 18 

1 REM skakölegesteese ak ke estestezteskesle 
. 2 REMXEREPERT 3 

3 REM sedesededestekesteteítezjezeslezteek 

19 A-19 

28 REFERAT 

39 ::::SzsS1A 

49 ::::ARzArt1 

59 UNTIL A2199 

69 PRINT 5 
A feladat a 10 és 100 közötti számok összeadása. A végeredmény (5005) megjelenik a 
képernyőn. 
Az 50. sorban a vizsgálatot Az 100-ra végezzük, mivel A értéke mindig csak az összedás 
után nő meg, tehát az utolsóként elért 100-at is hozzá kel! adni. 
Példánk nem a legszerencsésebb, mert ez a feladat a hagyományos FOR. ..NEXT ciklus- 
sal sokkal egyszerűbben megoldható: 

10 FOR A—10 TO 100 

20: :5-STA 

30 NEXT 

40 PRINT S 


A REPEAT...UNTIL jelentősége nem is itt, hanem a bizonytalan végű ciklusoknál mu- 
tatkozik meg. A FOR...NEXT ciklus végét ugyanis csak előre meghatározottan, tehát 
nem a cikluson belül létrejött változások függvényeként adhatjuk meg. Ezzel szemben 
a REPEAT...UNTIL esetében a zárófeltétel tetszőleges, a ciklusban előálló feltétel lehet. 
Tulajdonképpen nem is hasonlítható össze a FOR...NEXT-tel, mert más a rendeltetése. 
A különbséget egy egyszerű példán szemléltethetjük: 

Egy szekvenciális file-t szeretnénk olvasni, amelynek végét az ST státuszváltozó értéké- 
ről (64) ismerjük fel. Mivel a file vége bizonytalan, a FOR. ..NEXT ciklus nem alkalmazha- 
tó. Standard BASIC-ben Így oldhatnánk meg: 


10 OPEN 1,8,2," ADATOK, S,R" 
201-0 

30 : : : 1—1-4-1 

40 : : : INPUTS1, Ax) 
50IFSTA 564 THEN GOTO 30 
60 CLOSE 1:END 


A ciklust itt "kézzel" építettük fel és az IF-lekérdezésével lépünk ki belőle. REPEAT. ..UN- 
TIL-Ial a problémát sokkal elegánsabban is megoldhatjuk: 


10 OPEN 1,8,2,"ADATOK,S,R" 
201—0 

30 REPEAT 

40::::1-—1It1 

50 : : : : INPUTH1T,A$(1) 

60 UNTILST —€ 5 64 

70 CLOSE 1 


Igaz, hogy eggyel több sort használtunk fel, de kiküszöböltünk egy GOTO utasítást, 
amellyel jelentősen hozzájárultunk a strukturált programozás megvalósításához 


5.1.4 LOOP...EXIT IF...END LOOP - ciklusvezérlés 


Formátum:  LOOP-Ciklus:EXIT IF feltétel:END LOOP 
Paraméterek: ciklus — egy ciklus utasításai 

feltétel — a ciklus zárófeltétele 
Funkció: Egy ciklus vezérlése valamilyen feltétellel 
Példa: LOOP:A— A 7 1:EXIT IF A— 1000:END LOOP 


Első ránézésre a ciklus logikája hasonlít a REPEAT...UNTIL utasításra, de azzal szemben 
néhány előnyös tulajdonsággal rendelkezik. Ezek a következők: 
— A ciklus megszakításának feltétele a ciklusutasítások között szerepelhet: 


10 LOOP 
20A—A11 

30 EXIT IF Az 20 
40 B—BTA 

50 END LOOP 


- Tetszőleges helyeken egyszerre több feltételhez is köthetjük a ciklus megszakítását: 


10 LOOP 
20A—AT1 

30 EXIT IF Az 20 
40 B—B-TFA 

50 EXIT IF B5 100 
60 END LOOP 


Térjünk vissza mégegyszer a strukturált programozáshoz. Az utolsó példánk standard 
BASIC-ben a következőképpen nézne ki: 

10 A—AT11 

20IFA 5 20 THEN 50 

30 B—BTA 

40IFB 5 100 THEN 50 

00 
Ismét két GOTO-utasítást kellett alkalmaznunk, ami bizony nem a strukturált programo- 
zást szolgálja. 
Még egy példán bemutatjuk a LOOP alkalmazását. A feladat a következő: Kérdezzük le 
a billentyűzetről, hogy szükség van-e kinyomtatásra. Ha igen, hívjuk le az 1000. sorral 
kezdődő alprogramot, ha nem, folytassuk a főprogramot. i 
Standard BASIC-ben így tudjuk megoldani: 
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10 PRINT"NYOMTATÁS (I/N)?" 

20 GET X$:IF X$ c 5"I" AND X$ € 5"N" THEN 20 
30 IF X$ — "I" THEN GOSUB 1000 

40 ... 


Most pedig SIMON s BASIC-ben: 


10 PRINT"NYOMTATÁS (I/N)?" 
20 LOOP 

30 GET X$ 

40 EXIT IF X$— "TV" 

50 EXIT IF X$—"N" 


60 END LOOP 
70 IF X$—"I" THEN GOSUB 1000 
80 ... 


Igaz, hogy itt sokkal több sort alkalmaztunk, de sokkal áttekinthetőbbé vált a program. 
Kiesett egy GOTO, ami szintén előnyére vált a programunknak, hiszen a sorok közti , vad 
ugrálás" nem célja a strukturált programozásnak. 
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5.1.5 Ellenőrző kérdések 


. Az alábbi IF...THEN. . ELSE-változatok közül melyik a helyes? 


a) IFA-— 1 THEN 100:ELSE GOTO 200 


/b) IF A- 1 THEN 100:ELSE:GOTO 200 


6) IFA- 1 THEN 100 ELSE GOTO 200 
d) IFA-1 THEN 100 ELSE:GOTO 200 


. Mire vonatkozik az RCOMP utasítás? 


a) Az utolsó IF-lekérdezésre 

5) Az utolsó IF...THEN. . .ELSE-lekérdezésre 
c) Az első IF-lekérdezésre 

d) Az első IF...THEN...ELSE-lekérdezésre 


. Melyik REPEAT-változat a helyes? 


a) REPEAT:GETX$:UNTIL X$ c 5 7" 
b) REPEAT GETX$S UNTIL X$ c 5 " " 
c) REPEAT GET X$:UNTIL X$ c 2" " 


. Melyik LOOP-változat helytelen? 


7a)) LOOP:GET X$:EXIT IF X$—"J":EXIT IF X$—"N" END LOOP 


b) LOOP:A— At 1:B—-BTA:EXIT IF A 5 100R B 5 20:ENDLOOP 
c) LOOP:EXIT IF 1— 10:1—1-- 1:READ A(1:END LOOP 


. Milyen számokat fog az alábbi program kijelezni? 


A— 10:LOOP:EXIT IF A 5 20:A— A -- 1:PRINT A:END LOOP 


a) 10-20 
b) 11-20 
c) 10-21 
d) 11-21 
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5.2 Ugrások megvalósítása 


5.2. PROC -— szimbolikus cím 


Formátum: PROC címke 

Paraméterek: címke — címke azaz más néven egy szimbolikus cím (ang. label) 
Funkció: A szimbolikus ugrási cím kiadása 

Példa: 100 PROC BEVITELI ALPROGRAM 


Ez azt jelenti, hogy a 100. sorral kezdődő alprogramra ezentúl a BEVITELI ALPROGRAM 
szimbolikus címmel hivatkozhatunk. 

Erre a pontra már a RENUMBER tárgyalásakor is utaltunk, amikor is felmerült az a 
probléma, hogy ez az utasítás a GOTO és a GOSUB ugrócímeit nem módosítja az 
átsorszámozott programnak megfelelően. Az itt bemutatott utasításhoz nem sorszámot, 
hanem szimbolikus címet kapcsolhatunk, így az átsorszámozás nem fog gondot okozni. 
A szimbolikus címzést (létrehozását) a PROC-utasítással végezhetjük, minden gond 
nélkül. Ha egy sorra szimbolikus címmel akarunk hivatkozni, egy PROC-ot tartalmazó 
sort kell elhelyezni, például így: 


100 PROC NÉV BEADÁSA 
110 INPUT"KÉREM A NEVET:";X$ 


Ha most a 110. sorra akarunk ugrani, nem a GOTO 110 utasítást, hanem a CALL NÉV 
BEADÁSA utasítást alkalmazhatjuk. A CALL-t később ismertetjük! 


Figyelmeztetés! A PROC-ot tartalmazó sorban más utasítás nem szerepelhet! 


5.2.2 END PROC - az alprogram vége 


Formátum: END PROC 

Paraméterek: — 

Funkció: .. Az alprogram végének meghatározása 
Megjegyzés: Rendeltetése a RETURN-éhez hasonló 


Az előzőekben ismertettük a PROC-utasítást, amellyel szimbolikus ugrási címeket adha- 
tunk meg. Az END PROC-cal kiegészítve lehetőségünk van teljes alprogramok meghatá- 
rozására, amelyeket PROC-cal nyitunk és END PROC-cal zárunk. 


100 PROC KIVITELI ALPROGRAM 


110 ::::  PRINT"VEZETÉKNÉV: "vs 
120 :::: .PRINT"KERESZTNÉV: "K$ 
130 ::::  PRINT"UTCA "U$ 
140 ::::  PRINT"VÁROS "v$ 
150 END PROC 


Ez az alprogram a KIVITELI ALPROGRAM nevet viseli és az EXEC KIVITELI ALPROG- 
RAM-utasítással hívható be. Az END PROC a RETURN-hoz hasonlóan az alprogram 
végén visszaküldi az interpretert a főprogramba. 
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5.2.3 CALL — ugrás a szimbolikus címre 


Formátum: CALL címke 
Paraméterek: címke — vagy más néven szimbolikus ugrási cím 
Funkció: A PROC-cal definiált szimbolikus cím behívása 
Példa: CALL BEVITEL 
A program a BEVITEL Sinévezésű szimbolikus címre ugrik. 


Megjegyzés: Működése a GOTO-éhoz hasonló. Így például egy GOTO 100 utasítás 
átírható CALL 1. CIM-re. 
Egy ilyen címkékkel ellátott programrészt mutatunk be a következő listán: 


100 PROC GET 
110 : : : : GET X$:IF X$—"" THEN CALL GET 


120 : : : : IF X$5— "AT THEN CALL INPUT A:ELSE:CALL GET 
130 PROC INPUT A 
140 .... 


Megint sikerült kiküszöbölnünk néhány GOTO-t. A SIMON s BASIC RENUMBER utasításá- 
nak hátrányai megint csökkentek. 


5.2.4 EXEC - ugrás egy alprogramba 


Formátum:  EXEC címke 
Paraméterek: (mint az előzőekben) 
Funkció: Ugrás a PROC. ..END PROC-cal meghatározott alprogramba 
Példa: EXEC BEVITELI ALPROGRAM 
Megjegyzés: Működése a GOSUB-éhoz hasonló. 
Minden nagyobb program megköveteli a szubrutinok alkalmazását. A strukturált prog- 
ramnyelvek, mint a COBOL vagy a PASCAL, szinte teljes egészében szubrutinokból 
állnak, melyeket a főprogram vezérel. Erre a SIMONs BASIC is lehetőséget nyújt. 
A következő példán egy jól szervezett, strukturált programot láthatunk: 

110 EXEC OPEN-FILE 

120 PROC START 

130 : : : EXEC BEVITELI MASZK KIJELZÉSE 

140 : : : EXEC BEVITELI MASZK KITÖLTÉSE 

150 : : : EXEC REKORD ÍRÁSA 

160 : : : PRINT"VAN MÉG ADAT (I/N)?" 

170 : : : EXEC PROC GET NN 

180 : : : : IF AN$— "1" THEN CALL START 

190 CALL CLOSE-FILE 

200 EXEC PROGRAM VÉGE 


Ez egy adatrögzítő program, amelyhez már csak a megfelelő szubrutinokat kell kidolgoz- 
nunk. Lehet, hogy egy kicsit szokatlan ez a programozási stílus, de érdemes elsajátítani. 
A szabály az, hogy először mindig a főprogramot kell kidolgozni, csak ezután következ- 
hetnek az alprogramok. A strukturált programozás megkönnyíti a hibakeresést is. 
Ismerkedjünk most meg két hibaüzenettel, amelyekkel a szimbolikus programozás során 
találkozhatunk. 


PROC NOT FOUND 
-— A CALL-lal vagy EXEC-kel megadott cím nem található. 
END PROC WITHOUT EXEC 
- A programban EXEC nélküli END PROC-utasítás található. 
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Az 5.2.1-—5.2.4 pontban tárgyalt utasítások alkalmazását a lemezen ialálható "2.PLACE" 
című programon is tanulmányozhatjuk (8.2 fejezet). 


5.2.5 CGOTO — számított ugrási cím 


Formátum:  CGOTO aritmetikai kifejezés 
Paraméterek: Aritmetikai kifejezés — annak a sorszámnak a kiszámítási módja, amelyre 
a programot küldeni akarjuk 


Funkció: A GOTO-utasítás olyan változata, amely számítássai meghatározott ugrás 
címet is elfogad 
Példa: CGOTO(N-- 132) 


Mikor a programfeldolgozás idáig ér, kiszámítja a változók pillanatnyi értékei alapján az 
N-t 1r2 értéket, amely a következő végrehajtandó sor száma lesz. 

Az On ERROR-nál már utaltunk erre az utasításra, amikor az ugrási címet a hibás sor 
száma és a lépték összege adta. A CGOTO nélkül ilyen kiszámított ugrási címet nem 
alkalmazhatnánk. 

A CGOTO-t felhasználhatjuk például a menüből történő választás és az ezt követő 
programelágaztatás létrehozására. 


10 PRINT"MENÜ" 
20 PRINT "————" 
30 PRINT"1-ADATRÖGZITÉS" 
40 PRINT"2-ADATOK MÓDOSITÁSA" 
50 PRINT"3-ADATOK TÖRLÉSE" 
60 PRINT"4-ADATOK KINYOMTATÁSA" 
100 PROC GET 
110 :::GET X$:IF X$ c "17" OR X$ 5 "4" THEN CALL GET 
120 2- VAL(X$) 
130 CGOTO Z:10-- 130 
140 CALL ADATRÖGZITÉS 
150 CALL ADATOK MÓDOSÍTÁSA 
160 CALL ADATOK TÖRLÉSE 
170 CALL ADATOK KINYOMTATÁSA 


A menüből történő választás az 1-4 értékek beírásával, és a CGOTO utasításban 
kiszámított címre történő elágaztatással történik. Ezen kívül a CGOTO még sok egyéb 
helyen használható a programozó fantáziája szerint. 
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5.2.6 Ellenőrző kérdések 


als 


Milyen előnyökkel! rendelkezik a szimbolikus címzés? 


a) Kiküszöbölhetjük a GOTO és GOSUB utasításokat. 
b) Áttekinthetőbb lesz a program. 
c) Kiküszöbölhetjük az alprogramokat. 


. Melyik utasítással helyettesíthetjük a standard GOTO-t? 


a) CALL 
b) EXEC 


Melyik utasítással helyettesíthetjük a standard GOSUB-ot? 


a) CALL 
b) EXEC 


. Írhatunk-e egy PROC-sorba más utasítást is? 


a) Igen 
b) Nem 


. Melyik utasítással fejezzük be az EXEC-kel lehívott alprogramot? 


a) RETURN 
b) END PROC 
c) PROC 


. Melyik a következő végrehajtandó sor a CGOTO utasítás szerint? 


10 A—9 
20 CGOTO(A 1 1)"10-- 130 


a) 1310 
b) 210 
c) 230 
d) 220 
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6. FEJEZET 
Változók 


Standard BASIC-ben a változók mindig egy meghatározott értékkel rendelkeznek. Ha ezt 
megváltoztatjuk és az eredeti értéket nem rögzítettük, akkor az elveszik, vissza nem 
hozható. 

A SIMON s BASIC ebben a témakörben is újat tud nyújtani. Ismerkedjünk meg két új 
fogalommal: globális és lokális érték. Mit is jelentenek ezek? A globális érték a változó- 
nak a teljes programfutás során érvényes értéke, amelyet a szokásos módon definiálunk. 
Ezzel szemben a lokális érték mindig csak egy programszakaszban érvényes. Ha már 
nincs rá szükség, a változó újra felveszi a globális értéket, ami ezúttal nem veszett el, 
visszahozható anélkül, hogy azt előzőleg tároltuk volna. Tehát minden változónak két, 
egy globális és egy lokális értéke lehet. 


6.1 LOCAL -— a változók lokális értéke 


Formátum: LOCAL 1. változó, 2. változó, 3. változó. . .stb. 

Paraméterek: Változók — a programban előforduló, tetszőleges számú és típusú változó 
(pl. A, A$, A90) 

Funkció: A lokális változók meghatározása, kijelölése 

Példa: Példa: LOCAL A$, X$, B 


Az A$, X$ és B változókat lokális változóként jelöli ki, ami azt jelenti, hogy a programban 
lokális értékeket rendelhetünk hozzájuk. 

Hosszabb programokban sokszor annyi változóra van szükségünk, hogy végül könnyen 
áttekinthetetlenné válik a program. A változók nagy száma a LOCAL utasítással jelentő- 
sen csökkenthető, mert lehetőséget ad arra, hogy egy változót a program különböző 
részeiben alkalmazzunk. Mielőtt a változókat módosítanánk, azaz lokális értéket rendel- 
nénk hozzájuk, lokális változóként kell őket definiálnunk. 


P. 19 

1 REM EEEN KEREKEK 

2 REMKLÜCHAL E 

3 REM kitkkkkkkkkkk 

198. RETT sEgéee dee ege de ák jézte dle teje ae ae ale alkat lee ak ea akk 
118 REM GLOBALIS ERTEK HMEGHATARROZRER 
128 REM EXEFEREEKEEKEEEKEEKEE E EK kktkk 
198 A-128:B/-850 : A$- "GLOBAL IS" 

140 FRINT"GLOBALIS ERTEK:"; A: BZ: X§ 
159 REM sédédeteteeesede dee see est sek kék kk ék 
169 REM LOKALIS ERTEK MEGHATÁROZÁSA 
179 REM Kikkel 
189 LOCAL A. BZ, XA$ 

199 Azz48:B/z1708:X$-"LOKALIS" 

299 FRINT"LOKALIS ERTEK:";A: BA: A$ 


A 130. sorban hozzárendeljük a változókhoz a globális értéküket. A 180. sorban ezeket 
a változókat lokálisként definiáljuk, majd a 190. sorban az értéküket megváltoztatjuk. 
A LOCAL utasítás futás közben tárolja a globális értékeket, így azok visszahívhatók. 


6.2 GLOBÁL - a változók globális értéke 


Formátum: GLOBAL zi 
Paraméterek: — i 
Funkció: A változók eredeti értékeinek visszaállítása 
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Az előző példa globális értékeinek visszaírásához írjuk a következő sorokat a program- 
hoz: 


170 REM (GLOBÁLIS ÉRTÉK VISSZAÁLLÍTÁSA 
180 GLOBAL 
190 PRINT"GLOBÁLIS ÉRTÉK:"A;B99;X$ 


A 180. sorban tehát a változók visszakapják eredeti értéküket. Nem vesztek el azonban 
a lokális értékek sem, hiszen egy újabb LOCAL -utasítással ismét átadhatók a változónak. 
Írjuk be például közvetlen üzemmódban a LOCAL A utasítást és PRINT A-val nézzük meg 
az eredményt. Láthatjuk, hogy az megint 240. Ilyen módon tetszés szerint kapcsolhatunk 
globálisról lokális értékre és vissza. 

A két programot együtt rögzítettük GLOBAL néven. Töltsük be és próbáljuk ki a működé- 
sét: j 
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1 REM 44tEkErbkkkkkk 

Z REN SK ÖLEL OGB HERK 

3 REM K4XEKKKKEK KKK 

1909 REM 4GLOBALIS ERTEK:k 

119 A-120: B47-85A : A$-"GLOBAL IS" 
120 PRINT"GLOBALIS ERTEK: "HR: B42; A$ 
198 REM XLOKALIS ERTEKK 

149 LOCAL HA. B/ZX$ 

150 A-Z240 : B/-179A : A$z"LOKALIS" 
1609 PRINT"LOKALIS ERTEK :"HR;B/A:X3$ 
170 REM XGLOBALIS ERTEK VISSZAARLLITASRE 


196 GLOBAL 
198 FRINT"GLOBALIS ERTEK: "A; B42;X$ 
299 LOCAL A 


218 PRINT A 
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6.3 Ellenőrző kérdések 


ne 
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Mi a LOCAL-utasítás feladata? 


a) A globális értékek törlése és a lokális változók meghatározása. 

b) A globális értékek közbenső tárolása és a lokális változók meghatározása. 

c) A globális értékek közbenső tárolása és a lokális értékek hozzárendelése a válto- 
zókhoz. 

d) A globális értékek törlése és a lokális értékek hozzárendelése a változókhoz. 


. Mi a GLOBAL-utasítás feladata? 


a) A lokális értékek törlése és a globális értékek meghatározása. 

b) A lokális értékek közbenső tárolása és a változók globális értékeinek visszaállítá- 
sa. 

c) A lokális értékek közbenső tárolása és a globális értékek meghatározása. 

d) A lokális értékek törlése és a globális értékek visszaállítása. 


. Milyen változók vehetnek fel lokális értéket? 


a) Egész típusú változók (pl. A90). 
b) Füzér típusú változók (pl. A$). 
c) Valós típusú változók (pl. A). 


7. FEJEZET 
Matematikai eljárások 


7.1 Aritmetikai műveletek 
7.1.1 MOD — osztás maradéka 


Formátum: MOD (X,Y) 
Paraméterek: X — osztandó 


Y — osztó 
Funkció: Megadja az egész számmal (integer) való osztás maradékát 
Példa: PRINT MOD (14,3) 


A képernyőre kiírja a 14:3 kifejezés maradékát, azaz 2-t. 


Ez az utasítás megadja az osztás egész számú maradékát. Mik is azok az integer 
számok? Minden egész, azaz tizedesjegyeket nem tartalmazó szám. 

A CBM64 esetében csak 2-byte-os integer számok léteznek. Ezt egyrészt a tárral történő 
takarékosság, másrészt a megfelelő számítási pontosság indokolja. Egy 2-byte-os bináris 
szám maximális értéke 65 535 (21"9— 1) lehet. A Commodore 64-es minden főtárcíme is 
ilyen 2-byte-os szám. 

A BASIC integer változói negatív értékeket is felvehetnek. Mivel az előjelet a bal szélső 
bit tárolja, a szám ábrázolására csak a fennmaradó 15 bit vehető igénybe. Emiatt az 
egész típusú változók értéke csak — 32768 és --32767 közötti lehet. Ha a hozzárendelt 
érték ezen a tartományon kívülre esik (pl. A90 — 353000), megjelenik az 


ILLEGAL GUANTITY ERROR 


hibaüzenet. 

A MOD utasítás csak a 0 és 65535 közé eső pozitív egész számokat fogadja el. Minden 
más esetben az előbbi hibaüzenetet kapjuk. 

A MOD programban is, és közvetlen üzemmódban is alkalmazható. Nézzünk példát 
mindkét esetre: 


PRINT MOD(144,7) 


A képernyőn megjelenik az eredmény (4). 
Egy kis program: 


10 INPUT"OSZTANDÓ:  "-X 
20 INPUTTOSZTÓ — : "GY 
30 PRINT"MARADÉK :  ";MOD(X,Y) 


Az bsztó és az osztandó, tehát változóként is megadható. 
A Commodore 64-es integer változói az osztás után csak a tizedesvessző előtti értéket 
tárolják, a maradékot a MOD-dal kell megadnunk. Egy példa: 

10 A9 —50/12 

20 A— 50/12 

30 PRINT"A95 EREDMÉNY —"A94 

40 PRINT"A EREDMÉNY— "A 
Az A96 csak az osztás egész értékét, míg az A a helyes eredményt tartalmazza. Ilyenkor 
MOD-dal könnyen megkaphatjuk az osztási maradékot. 


10 A94 — 50/12 
20 B99 — MOD(50,12) 


30 PRINT"EREDMÉNY:"A99"MARADÉK:"B99 57 


7.1.2 DIV -— osztás eredményének egész része 
Formátum: DIV (X,Y) 
Paraméterek: X — osztandó 


Y — osztó 
Funkció: Megadja az osztás eredményének egész részét 
Példa: PRINT DIV (14,3) 


A képernyőn eredményként a 4 jelenik meg. 


A MOD és a DIV utasítások kombinálásával két integer szám egész számú hányadosát 
és a maradékot is meghatározhatjuk. 
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1 REM didédelé ák tereáőe 

2 REM$YIDIVEX 

3 REM ökre eik 

19 INFPUT"OSZTANDA: ";X 

28 INPUT"UÜSZTŰ sg KZT 

998 HAZA 

44 BZEMDD( XV? 

54 PRINT" EREDMENY: ";AZ 

68 PRINT" MARADEK : ";BA 

70 REM $DIV-VELE 

89 PRINT"EPROBALJA KI A DIV-YVEL IS."; 
98 PRLNT"NYOMJOM LE EGY BILLENTYŰT!" 
198 GET A£$:IF A$-"" THEN 189 

118 INPUT"WOSZTANDO: ";"/ 

129 INPUT"OSZTU KÉN 

139 DEDIVCX, 9) : MEMODCA 

149 PRINT" EREDMENY: ";D 

159 PRINT" MARADEK : ";H 

169 PRINT"MSHASONLITSA ÖSSZE FA FROGRAM 19-éRB ES 118-154ú SORAIT!" 


Alkalmazásuk tehát nagyon egyszerű és rendkívül jól használhatók. Ezt bizonyítja a 
következő példaprogramunk: 
A 7.2. pontban egy olyan utasítást fogunk megismerni, amellyel a bináris számokat 
decimálissá alakíthatjuk. A fordított átalakítás azonban csak programmal lehetséges, 
mint például a következő, amely a MOD és DIV utasítások felhasználásával, a "maradék- 
érték módszer"-rel dolgozik: 
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1 REM eeteretéseedeteteüee 

2 REM kZDIWV4x 

3 REM Hikktkkkrrkk 

194 PROC BEVITEL 

119: : INPUT"KEREK EGY DECIMALIS SZAMOT ú ES. 65525 KÖZÜTT!";N 
128 ::IF D2-0 AND D£-65535 THEN CALL KIVITEL 

139 ::PRINT CHR$(1432::CALL BEVITEL 

148 PROC KIVITEL 

159 ::PRINT"BINARIS ERTEKE: "; 

168 ::FOR I5-1 TO 16 


179 ::: :RsMODCID, 2) : DEDIVÁN 27 
19a :: : : :"PRINTTAB( 16-I2 ; R; CHR$( 1457 
19a ::NEXT I 


Indítsuk el a programot és próbáljuk ki a működését. Egy megfelelő számot beírva 
megjelenik a 16-bites, bináris megfelelője. 


7.1.3 FRAC - tört rész kijelzése 

Formátum:  FRAC (n) 

Paraméterek: n — valós típusú szám, vagy kifejezés 
Funkció: Valós szám tört részének kijelzése 
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Példa: PRINT FRAC (10/3) 
2 Kiírja a hányados tizedesvessző utáni értékét, azaz 3333333383-at. 


A standard BASIC-ben mindez meglehetősen primitív módon oldható meg. A hányados- 
ból le kell vonni annak egész értékét, ami feltételez néhány számátalakítást. SIMON s 
BASIC-ben mindez egyetlen rövid sorral elintézhető. 

Előző példánk decimális számokat binárissá alakított. Nézzünk most egy programot, 
amely decimálisról hexadecimálisra alakítja át a számokat. Töltsük be a lemezről a FRAC 
című programot. 
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REM €ttttkkkkkk 
Ebt EGES § 
jösztői tittttttvkk 
DIM A£C15. 
FOR Izú TO 15 
EAN A$-ÉI? 
MEAT I 
DATAA. 1.2 
FROC BEVITEL 
: : INFUT"HECIMHALIS SZAM €-SSSS5":N 
::1ÍF D5-8 AHL IX 65535 THEN TEALL KISZTITEL 
: FRIMTCHE$(145) : ; CALL BEVITEL 
199 FROC KIVITEL 
280 ::FRINT:FRINT"HEARINIECIMALIS ERTEKE: " 
218 ::FÜR I5s1 TR 4 
2zd :: : :R-IS$FRRCK(IV1£7:D-INT(IW187 
::::PRKINTTHEC4-I2; H$(R?I; CHR$C1457 
248 ::NEXT I 


Indítsuk el és próbáljuk ki, hogyan működik. 0 és 65535 közti értéket beírva a képernyőn 
megjelenik annak négyjegyű hexadecimális megfelelője. 


9 aa 


"H.B... D.E.F 


Da 


— heá eat ad e s ELJ TÜ B TÖ 
Cal 


NN RV MVMED 


mm 


LD 0 


7.1.4 EXOR — exkluzív-VAGY kapcsolat 
Formátum:  EXOR (n, n1) 
Paraméterek: n, n1 - összekapcsolandó számok 0 és 655835 között 
Funkció: Két szám összekapcsolása exklusiv (kizáró) VAGY-gyal 
Péida: PRINT EXOR(255,1) 

Átkapcsolja a 255-ös érték 0. bitjét O-ra. 


Valószínűleg nem mindenki tudja, hogy mi is az a BOOLE algebra. 
A standard BASIC ennek három kapcsolatát ismeri: OR, AND, NOT. Ezeket a logikai 
kapcsolatokat használjuk az IF lekérdezésekben, továbbá ezekkel kezelhetők meghatá- 
rozott tárfekeszek is. 
Az utóbbi esetben a logikai kapcsolatok hatása a következő: 

OR — a biteket bekapcsolja 

AND — a biteket kikapcsolja 
A Commodore 64-esben több különböző rendeltetésű regiszter van (hang, grafika stb.), 
amelyeket ezekkel az utasításokkal programozhatunk. Minden regiszter 1 byte (8 bit) 
hosszúságú és minden bit be- ill, kikapcsolható a logikai operátorokkal. 
Ez a következők szerint történik: 
Először is ismernünk kell egy byte felépítését: 


02 205 20-e 305 060 GOLED 

vit 77 ua sgt 78 02 e0 

értéke 128 64 32 16 8 4 2 i 
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Egy byte tehát 8 bitből áll, amelyek mindegyike sorszámmal és értékkel rendelkezik. Ha 
egy bitet be akarunk kapcsolni, akkor az adott rekesz és a bit értéke között VAGY (OR) 
kapcsolatot kell létrehozni. Pl. az 53248-as tárolórekesz 4. bitjét így kapcsoljuk be: 


POKE 53248, PEEK (53248) OR 16 


A logikai kapcsolatot valójában a rekesz tartalma és a 4. bit értéke (16) között hoztuk 


létre. 
Még egy példa: Ugyanezen byte O, 1, 2 és 3-as bitjét 1-re akarjuk váltani: Ez így történik: 


POKE 53248, PEEK (53248) OR 15 


Kicsit nehezebb dolog a bitek kikapcsolása, mert ebben az esetben nem a bit értékét, 
hanem annak 255-ből kivont értékét használjuk fel. 

Így a 0. bit kikapcsolásához az ÉS (AND) jobb oldalán a (255-1) kifejezésnek kell állnia. 
Az előbb bekapcsolt bitek a következőképpen kapcsolhatók ki: 


POKE 53248, PEEK(53248) AND (255—16) 
POKE 53248, PEEK(53248) AND (255-—15) 


vagy egyetlen utasítással: 


POKE 53248, PEEK(53248) AND (255-31) 


A SIMONS s BASIC egy újabb kapcsolat megteremtésével egyszerűsíti a bitek ki- és 
bekapcsolását. Ez az EXOR, amely a bitek átkapcsolását eredményezi. Vagyis, ha egy 
bit eddig 0 volt, az EXOR kapcsolat után 1 lesz és fordítva. 

Példa: Kapcsoljuk át az 53 250-es tárolórekesz 7. bitjét. 


POKE 53250, EXOR (PEEK (53250), 128) 


Az írásmód egy kicsit megváltozott, mivel az EXOR írásmódja (EXOR (n,n1) eltér az OR 
és az AND írásmódjától (n OR/AND n1). Itt talán a SSIMONS ss BASIC-nek kellett volna 
alkalmazkodnia. 

Végül nézzük a következő példát: 
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1 REM Hittrktktkk 
2 REMKEKRÜRBMHR 
3 REM $itddb sb kek 
108 REM 

118 PRINT"T" 


128 CENTRE"B FELIRAT NEHANY PILLANAT" :FRINT 
158 CENTRE"MULYA IMVERZ ALAKBAN LESZ":PRINT 
148 CENTRE"LATHATO !" 

158 PAUSE 3 

169 FÜR Xz-f TŰ 216 

170 :H-PEEKK18z4-4A) 

186 :IF As3z THEM 2RA 

199 :2-ESDR(H. 7 190099009 

zat :FOKELHZ4HAÁ SZ 

210 NEST X 

zef END 
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7.1.5 Ellenőrző kérdések 


1. Mit eredményez a PRINT MOD (33,7) utasítás? 


3. Melyik a MOD és DIV utasítás paramétereinek legnagyobb megengedett értéke? 


a) 32767 
b) 65535 
c) 1E- 38 


4. Mit eredményez a FRAC-utasítás? 
a) Integer szám tizedesvessző utáni értékét. 
b) Integer szám tizedesvessző előtti értékét. 
c) Valós szám tizedesvessző utáni értékét. 
d) Valós szám tizedesvessző előtti értékét. 


5. Ha át akarjuk kapcsolni az 53300-as rekesz 0. és 1. bitjét, melyik utasítást alkalmaz- 
zuk? 


a) POKE 53300, PEEK (53300) EXOR 3 
b) POKE 53300, EXOR (PEEK (53300),3) 
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7.2 Számok átalakítása 


7.2.1 "A — bináris-decimális átalakítás 


Formátum: 9 bináris érték 
Paraméterek: bináris érték — egy nyolcjegyű bináris szám 
Funkció: Bináris érték átalakítása decimálissá 
Példa: PRINT 90 11111111 

Az eredmény: 256. 


A 99-jellel jelöljük meg a nyolcjegyű bináris számokat, amelyek ezután kiírathatók vagy 
tárolhatók. A bináris számokat 0 és 1 számjegyekből építjük fel. Ha más számjegyet is 
felhasználunk, a 


NOT BINARY CHAR 


hibaüzenetet kapjuk. 

A PRINT 96 00001111 írásmódon kívül alkalmazhatjuk a POKE 53280, 9500011100 vagy az 
A— 99 00001110 formát is. 

Logikai műveleteknél ez az írásmód nagyon előnyös, mert a bitekkel való manipulációk- 
hoz nem kell előzetes átszámításokat végezni. A 49152-es rekesz 0. és 2. bitjének 
bekapcsolásához pl. az alábbi egyszerűbb utasítást alkalmazhatjuk: 


POKE 49152, PEEK (49152) OR 90 00000101 


. Ez a módszer megkönnyíti a bitekkel és a byte-okkal végzett munkát. 
A 7.1.2 pontban egy olyan programot ismertünk meg, amelyik a decimális számokat 
16-bites bináris számokká alakítja. 


7.2.2 $ — hexadecimális-decimális átalakítás 


Formátum:  $ hexa-érték 
Paraméterek: hexa-érték — négyjegyű hexadecimális szám 
Funkció: A hexadecimális számokat decimálisra alakítja 
Példa: PRINT $0OFF a 

Az eredmény: 255. 


Ha a hexa-érték nem négyjegyű, vagy érvénytelen karaktereket tartalmaz, akkor a 
NOT HEX CHAR 
hibaüzenetet kapjuk. 


Ez az utasítás az operációs rendszer rutinjainak alkalmazásánál jelent komoly segítsé- 
get. Érdekes rutinokat vehetünk át a Commodore 64-es ROM listájából, ,A Commodore 
64-es belső felépítése" című DATA BECKER-NOVOTRADE könyvből." Ezeknek a rutinok- 
nak a címei többségükben hexadecimális formában vannak megadva, ezért mielőtt 
használnánk, decimálissá kell alakítanunk őket. Erre szolgál a $-jel. 

Ha pl. az operációs rendszer $FCE2 (hidegindítás) címét akarjuk decimálisra átszámítani, 
elegendő az alábbi utasítás beírása. 


PRINT $FCE2 
" A mű eredeti címe: 64 Intern (1984) 
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Az eredmény (64738) megjelenik a képernyőn, a SYS 64738 utasítással pedig elindíthatjuk 
azt a rutint, amely a gépet alapállapotba hozza. A rutin közvetlenül hexadecimális 
formában is lehívható az alábbi utasítással: 

SYS $FCE2 


Ahol decimális értékek beírása szükséges, de csak azok hexadecimális megfelelőjét 
ismerjük, ott minden esetben alkalmazhatjuk a $-jelölést. 
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7.2.3 Ellenőrző kérdések 
1. Az alábbi utasítások közül melyik eredményez hibaüzenetet? 


a) PRINT 96 10101000 
b) POKE 53000, EXOR (PEEK(53000), 97500000011) 
c) PRINT $ 0011 


2. Milyen szabályok érvényesek a 99-jel alkalmazásakor? 


a) A bináris szám max. 8 számjegyből állhat. 

b) A bináris szám max. 16 számjegyből állhat. 

c) A bináris szám csak 0-s és 1-es számjegyekből állhat. 
d) A bináris szám csak az 1-es számjegyből állhat. 


3. Melyik utasítás eredményez hibaüzenetet? 
(a) PRINT $FF 
b) POKE 1024, $0000 
c) A — $00FF-t $000F 
4. Milyen szabályok érvényesek a $-jel alkalmazásakor? 
.a) A hexadecimális szám max. 2 számjegyből állhat. 
b) A hexadecimális szám max. 4 számjegyből állhat. 


c) Csak decimális számjegyek (0-9) alkalmazhatók. 
,d) Csak hexadecimális számjegyek (0-9 és A-F) alkalmazhatók. 
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8. FEJEZET 
Műveletek füzérekkel 


8.1 INSERT - füzérek egymásba építése 


Formátum:  INSERT ("1. füzér", "2. füzér", poz.) 
Paraméterek: 1. füzér — beépítendő (belső) füzér 
2. füzér — külső füzér 
poz. — az a pozíció, ahonnan az 1. füzért a 2.-ba beépítjük 


Funkció: Egy füzér beépítése egy másik füzérbe 
Példa: 10 X$-INSERT("CBM V2"7;"EXPANDED BASIC" 8) 
20 PRINT X$ 


A program eredményeként a képernyőn a következő felirat fog megjelenni: 
EXPANDED CBM V2 BASIC 


Az összeépítendő füzérek (stringek) változóként is megadhatók. A példában szereplő 
sorok ekkor így módosulnak: 


10 A$—"CBM V2" 

20 B$—"EXPANDED BASIC" 
30 X$-—INSERT (A$,B$,8) 

40 PRINT X$ 


Ha a pozíciót is változóként adjuk meg, így fog kinézni a programunk: 


10 A$—"CBM V2" 

20 B$—"EXPANDED BASIC" 
30 C-8 

40 X$-INSERT(A$,B$,C) 

50 PRINT X$ 


Az INSERT utasítás alkalmazásakor az alábbi szabályokat kell betartanunk: 


1. A belső füzér nem lehet hosszabb, mint a külső. 

2. A végeredményként kapott füzér maximális hossza 255 karakter lehet. 

3. Ezzel az utasítással a két füzért nem fűzhétjük össze, azaz a pozícióként megadott 
szám maximálisan a külső füzér karaktereinek száma, mínusz 1 lehet. 

4. Közvetlen üzemmódban a füzéreket csak füzérváltozóként adhatjuk meg, jelkombiná- 
cióként (pl. "xyz") nem. Bár nem sok értelme van ezt az utasítást közvetlen üzemmód- 
ban alkalmazni, a SIMONSss BASIC reagálása mégis elgondolkoztató. 


Az 1. és 3. pont be nem tartása 
INSERT TOO LARGE, 


a 2. pont be nem tartása pedig 
STRING TOO LARGE 
hibaüzenetet eredményez. 


A 4. pontban leírtakat próbáljuk ki az előző program füzérváltozóinak felhasználásával. 
Írjuk be direkt üzemmódban a 
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PRINT INSERT (A$, B$,8) 
parancsot. Az eredmény a helyes szöveg lesz, azaz 


EXPANDED CBM V2 BASIC 
Mi történik, ha az A$ helyett beírjuk annak tartalmát, vagyis egy állandót? 
PRINT INSERT (7CBM V2",B$,8) 
Nem történt semmi különös, az eredmény most is a helyes szöveg. 
Cseréljük ki most a B$-t is annak tartalmával: 
PRINT INSERT (7CBM V2", "EXPANDED BASIC",8) 
Az eredmény most egy összevissza keveredett szöveg: 
EXPANDED BASIC BASIC 


Ez tehát egy kis szépséghibája ennek az utasításnak, de mivel közvetlen üzemmódban 
úgy sincs sok értelme használni, tekintsünk el tőle. Programban kifogástalanul működik. 
Gyakorlásképpen hívjuk be a lemezről az INSERT című programot: 
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1 REM Kiket egek 

2 REMKINSERTE 

3 REM Hikttktkkkkekkekk 

199 X$-INSERT("HAGYTRRORSZAG" , "EUDAPEST  FOVAROSA", 37 
119 PRINT""BKULSO STRING : PUDNAPFEST FOVRROSA" 
122 PRINT"MBEEFITENDŐ STRING 0: MAGYARORSZAG" 

128 PRINT"ER PROGRAM EREDMENYE: " 

149 PRINT"IORBBBRI" ; /$ 

150 REM $k FELDA VALTOZOKKAL. 

1698 PRINT" HNWPROBALJA MEG ON IS AZ OSSZEEFITEST!NYOM-JÜM LE EGY BILLENTYŰT!" 
179 GETO$:IF 0$-"" THEN 179 

189 INPUT"MKEREMH A BEEPITENDO STRINGET: ";A$ 

199 INPUT"YKEREM A KULSO STRINGET : ":B$ 

2008 INPUT"WMELYIK POZICIOTOÜL KERI HA. BEEPITEST: ";(C 
210 X$-INSERT(A$,B$.C? 

228 PRINT" HIRMNININI" ; X.$ 

238 END 


Figyelem!Ha a programot elindítottuk, a feltett három kérdésre feltétlenül válaszolni kell 
(nem lehet RETURN-nel átugrani), mert különben a gép "kiakad" és csak úgy tudjuk 
helyrehozni, ha kikapcsoljuk. Ez a program az eredeti könyvben nem szerepel, szemlél- 
tetés céljából közöljük — magyar változat készítői. 


8.2 INST - füzér felülírása 


Formátum:  INST ("1.füzér", "2.füzér" poz.) 
Paraméterek: 1.füzér — a felülíró füzér, 
2.füzér — az eredeti füzér, 
poz. — az eredeti füzérben az a pozíció, amelytől kezdve a felülírás történik 


Funkció: Egy füzér felülírása egy másikkal 
Példa: 10 X$ — INST (7130", "MENNYISÉG:500 DB",11) 
20 PRINT X$ 
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A képernyőn az alábbi szöveg fog megjelenni: 
MENNYISÉG: 130 DB, 


vagyis az 1. füzér felülírta a 2.-at a 12. karaktertől kezdődően. Láthatjuk, hogy a poz.-para- 
méter tulajdonképpen nem is azt a pozíciót jelöli, ahonnan az átírás történik, hanem 
pontosabban annyi karaktert jelent, amennyi az eredeti szövegből megmarad. 

Az INST utasítás paraméterei megegyeznek az INSERT utasítás paramétereivel. 

Ebben az esetben az 1. füzér hosszabb is lehet a 2.-nál. Káros következményekkel jár, 
ha a 2. füzér meghatározatlan füzérváltozó. Ekkor a SIMONss BASIC "elszáll" és további 
füzérfeldolgozásra alkalmatlanná válik. 

A poz.-paraméter nem haladhatja meg a 2. füzér hosszát. Ilyenkor ugyan nem kapunk 
hibaüzenetet, de az így keletkezett füzér felépítése nem fog megfelelni az elképzelé- 
seinknek. 

A létrejött füzér természetesen most sem haladhatja meg a 255 karakternyi hosszúságot. 
Az INST utasítás érdekes megoldást kínál relatív adatfile-ok szervezésekor a rekordok 
összeállításához. ; 
Egy rekord általában több mezőből áll, amelyeknek mindig ugyanazon a helyen kell 
kezdődniük. Egy cím-file rekord felépítése pl. így nézhet ki: 


Mező Kezdőpozíció Változó 
a rekordban 

Vezetéknév [0] Vv$ 

Keresztnév 25 K$ 

Utca 45 U$ 

Irányítószám/helység 75 7 H$ 


Szerkesszük most meg ebből a négy füzérből azt a füzért, amelynek felépítése a fenti 
struktúrát követi. A füzér hossza 100 karakter legyen, amelyet először üres karakterekkel 
töltünk fel. Az alábbi programrészlet azt szemlélteti, hogy hogyan épül fel az új füzérben 
(R$) a rekord: 


100 R$—DUP("",100) 
110 R$— INST(V8,R$,0) 

120 R$— INST(K$,R$,25) 
130 R$— INST(U$,R$,45) 
140 R$—INST(H$,R$,75) 


A 100. sorban a DUP-utasítással (8.4. fejezet) előállítottuk a 100 szóközt tartalmazó R$ 
füzért, amelyet a következő négy sorban rendre felülírunk az adatokat jelölő változókkal. 
Ezután a rekord beolvasásakor minden mező a megfelelő helyre fog kerülni, a cím-file 
egységes szerkezetű lesz. 

A VC-1541 típusú lemezegység relatív adattárolásáról a "A VC—-1541-es lemezegység 
programozása" című DATA BECKER —- NOVOTRADE kiadványból" tudhatunk meg többet. 
Nagyon jól használható továbbá az INST-utasítás táblázatok kinyomtatásához. Az egyes 
mezőket elhelyezzük egy füzér adott pozíciójában és ezután a füzért kinyomtatjuk. Az elv 
az előzőleg ismertetett rekord felépítésével megegyezik. 

Ha már végeztünk füzérfeldolgozást standard BASIC-kel, megfelelően fogjuk értékelni az 
INST által nyújtott segítséget. 


" Eredeti címe: Das GroBe Floppy Buch (1983). 
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8.3 PLACE - füzér keresése 


Formátum: PLACE ("1.füzér" füzérváltozó) 
Paraméterek: 1.füzér — a keresett füzér; 

füzérváltozó — füzérváltozó, amelyben az 1. füzért keressük 
Funkció: Bizonyos karaktersorozat megkeresése egy füzérben 
Példa: A$-"12314567" 

PRINT PLACE ("x" A$) 

Az A$ füzérből kikeresi a "r"-ot. 


A PLACE-szel egy rendkívül jól használható utasításhoz jutottunk, amely hatását tekintve 
a standard BASIC-kel csak nehezen valósítható meg. 

INST-tel kombinálva további előnyökhöz juthatunk. 

Példa: A Commodore 64-esen, mint az összes többi amerikai szabvány szerint készült 
számítógépen, nem tizedesvesszőt, hanem tizedespontot használunk. A PLACE segítsé- 
gével megoldható, hogy a számokat (pl.: pénzösszegeket) a mi gyakorlatunknak megfele- 
lően tizedesvesszős formában írassuk ki. 

Nézzük erre a következő példaprogramot: 
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1 REM Etktkedték ee kek 
2. REM 4AaP. b FG E 
3 REM Meetededegededédeske de kesek ik 
199 REM 

119 INPUT"OSSZEG: ";B 
129 B$-STR$(B./ 

130 P-PLACEM".",.E$? 

140 B$zIMSTr".",E$.FP-17 
159 PRINT"OSSZEG: ";B$ 


A 110. sorban beolvasott "ÖSSZEG"-et a B változóban tároljuk, hogy később számításo- 
kat végezhessünk vele. A 120. sorban a numerikus változót füzérváltozóvá alakítjuk, majd 
a 130. sorban a PLACE-utasítással megkeressük a tizedespont helyét és ennek pozícióér- 
tékét a P változóhoz rendeljük. 

A 140. sorban az INST utasítást alkalmazva a pontot vesszővel helyettesítjük és a 150. 
sorban kiíratjuk az eredményt. 

A 140. sorban a vessző pozícióját (P— 1)-gyel határoztuk meg, aminek az az oka, hogy 
az INSERT és INST utasítások a számolást 0-tól kezdik, így a PLACE-utasítás 1. pozíciója 
ezekben 0-nak felel meg. Ugyanez a probléma standard BASIC-kel is megoldható, de 
legalább háromszor ennyi sorban egy sokkal áttekinthetetlenebb programmal. 

A PLACE-utasítással nem csak egy karakter, hanem tetszőleges karaktersorozat is 
kikereshető, amint ezt a következő példa is bizonyítja: 


10 A$-— "A DATA BECKER KÖNYVEK TANITANAK" 
20 PRINT PLACE ("KÖNYVEK" ,A$) 


Beírva, majd elindítva a képernyőn megjelenik a 15-ös szám, ami a KÖNYVEK - karakter- 
sorozat kezdőpozícióját jelenti. 

Ez az utasítás annyira megnyerte a tetszésünket, hogy kidolgoztunk egy programot, 
amely tetszőleges információkat keres és tárol. Egy-egy információ max. 2 képernyősor 
hosszúságú, amelyeket lemezen rögzítünk. A teljes információs-file-t, mint egy tábláza- 
tot, betöltjük a memóriába, ahol a címszavak a PLACE-utasítással könnyen és gyorsan 
kikereshetők. 

Hívjuk be tehát a 2.PLACE-című programot és tanulmányozzuk működését, valamint a 
programlistát: 
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1 RETT Sefedegesegedestede testetek 
2 REMXKZ2PLACEHR 
3 REM MKE e EE Ek et 


1998 
1019 
1929 
1930 
1949 
1950 
1960 


1970 :: 


1980 


19909 :: 
1199 : 
1119 : 


1120 


1130 : 
1149 : 
1158 : 
1160 : 
1179 : 


1180 


1199 : 
1290 : : : 
1210 ::: 


1220 


1230 : 
1240 : : 


1259 
1260 


1270 : : 


1289 


1299 : 


1300 
1310 
1920 
1830 
1340 


13590 : 


1360 


19370 : 
1990 : 


1390 


1490 : 
1418 :: 
1429 : : : 
1430 :: 


1449 


1450: : 
1460 : 


1470 


1480 :: 


REM eleget ledete de een dee 
REM ELOKESZÜLETEK 
REM MEREK ME HENK E EE ME 
POKES3Z2ZBB , 2 : POKE53281 , 2 


PRINTCHR$( 1582 
DIMI$C49997 
PROC MENU 
REM k40kg 
REM MENU 
REM akik 
: EXEC PROGRAM-FEJLEC 
:PRINT" VALASSZA KI A KIVANT FUNKCIOT!" 
: : PRINT" ";DUPC"-", 3729 :FRINT 
:PRINT TABC82;" -1- INFO-FILE BEOLYASASA" 
:PRINT TAB(82;" -2- INFO-FILE TAROLASA" 
: PRINT TAB(82;" -3- ADATROGZITES" 
:PRINT TAB(82;" -4- ADATOK TOÖRLESE" 
:PRINT TABC82;" -3- ADATOK KERESESE" 
: : PRINT TAB(82;5" -6- PROGRAM VEGE" 
:LODP 
: BET A$ 
: XSVALCX$) 
:::EXIT IF 429 AND XC? 
:END LOOP 
IFAz1 THEN EXEC INFO-FILE BEOLYASRASA 
IFXz2 THEN EXEC INFO-FILE TAROLASA 
IFXz3 THEN EXEC ADATROGZITES 
IFAz4 THEN EXEC ADATOK TORLESE 
IFXz5 THEN EXELC ADATOK KERESESE 
IFX:6 THEN EXEC PROGRAM VEGE 
(CALL MENU 
PROC INFO-FILE BEOLVASASA 


REM  FENENEME ENE JET E Ed ák AHHA ehesek 

REM INFO-FILE BEOLYASRASA 

REM HANEREHEE SE YE NÉ TEREKEN EHE EE NEK 

: "EXEC PROGRAM-FEJLEC 

: : INPUT"AZ INFO-FILE NEVE: " ; DN$ 

: OPEN1 , 8. 2, DN$ : CLOSE1 

: OPEN15.8.15 

: : INPUT$15.F13.F2$.F3$.F42 

: IF F1$5"DBO"THEM CLOSE19: CALL OLYRSAS 
: PRINT: PRINT"LEMEZHIBA! " 


:PRINTF1$","F2$","F3$","F43 
: : LOSE15 
:CALL 1. VISSZAUGRAS 
:PROC OLYASAS 
: : : OPEN1 , 8.2. UN$ 
:PRINT"UJ VAGY HOZZROLYVASÁAMDO €U/HJ?" 
: : :REPERT 
::::GET X$ 
::: UNTIL 4$-"U" OR x$z"H" 
:: IF A$-"I" THEN Yv-Aa 
: :LO00P 
:::: :ynysr1i 
::::: INPUTH1,I$(Y 
SAS EALT IF STS64 
::::END LO0P 
: : : L0SE1 
::PRINT"A SZRMITOGEP "v" INFORMALIOT TARTALMAZ" 
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16468 ::PROC 1.VISSZAUGRAS 3 
1618 ::::PRINT:FRIMT"55RETURNA(" 


1628 ::::REPERT 
1699 ::::::GET A$ 
1649 ::::UNTIL X$£-CHR$C13. 


1€50 END FROC 

1669 PROC INFO-FILE TAR(LASRA 

1679 ::REM séledesedetéd édesek esek eke 

1699 ::REM INFO-FILE TRROLASA 

1699 :: REM Mededededetegedede ae degeek lekees 

1708 :: EXEC FEROGRAM-FEJLEC 

1719 ::IF "-rü THEN PRINT"NINCS ADAT!!":CALL2. VISSZAUGRAS 
1729 :: INPUT"FILE NEYV";DN$ 

1728 ::PRKINTUN$" NEVU FILE TAROLASA !" 
174a ::0PEN 1.8.2.CHR$(6424":"4DN$S4" ,S.W" 
1758 ::FOR I-51 TOY 

17608 ::::PRINTHI.I$(ID 

1770 ::NEXT I 

1789 ::CLOSE1 

1798 ::PROC 2. vISSZAUGRAS 


1899 : : : :"PRINT:PRINT"52RETURNAC" 

1818 REPERT 

19828 :: : : : :GET X$ 

1859 : UNTIL A$5CHR$(13. 

1840 END FRAC 

1859 PROC INFORMALIOK BERDASA S 


18698 ::REM degedédédetedesede de jee ee ee 
1870 : :REM INFORMACIOK BERDASA 
18809 :: REM HENededededede desk steak ak de ske teste eat 
1899 : :EXEC PROGRAM-FEJLEC 

1999 ::IF Y58 THEN CALL BEVITEL 
1919 ::: : INPUT"FILE NEY: ";DN$ 
1928 ::PROC BEVITEL 92 
1939 ::EXEC PROGRAM-FEJLEC 

1949 bök es tévé 

19538 : FRIMT"ADJA BE RZ "VSZ. INFORMARCIOT:" 
1969 PRINT" (MAXIMUM 2 SORBAN?" 


1970 : : PFINTDUPC"—" , 399 

19808 ::INPUTI$(CY) 

1990 : : PRINTDUP("—" , 492; 

28809 : :PRINT"HELYES (I/N2?" 

2910 ::::REPERT 

2829 ::::GET X$ 

29898 :::: UNTIL X$z"I" OR 4X$-"N" 

2948 ::::IF X$z"N"THEN Yv-Y-1:CALL BEVITEL 
2050 ::::PRINT"TOVABBI BEVITELEKKI/ND?" 
2960 ::::REPERAT 

2a7a ::::::GET X$ 

2089 : 7: : UNTIL A$-"I" OR X$z"N" 


2999 ::IF X$5"I" THEN CALL BEVITEL 
2149 END PROC. 
2110 FROC IMFORMACZIOK TÜRLE 


St : 4tkkk 
z13a ::REM INFORMÁLT ÜK TÜRL 
2148 ::REM t ét ékkk 
2158 ::EXEC 


RÜGR. E. 
zi6A ::IF Y"z6§ THEN FRIHT"HIHCS AURT 1": CALLZ. VISSZAUSGRAS 
zlra ::INFUT"AZ INFORMACZIÚ SZAHR: "HM 


2189 ::FPRINTDUP("9-" , 39) 
2198 ::FPRINT" ".I$(Ni 
2268 : :PRINTDUF("—", 399 


z21A (:PRINT"TOROLMICIZHY?" 
2229 ::REFERT 

zz2ga ::::GET A$ 

zzdű ::LNTIL A$-"I" üg gtz"NH" 


zz5a ::IF A$-"M" THEN CHLL3. VISSZALGRAS 
: ::FOR [IzN Tü v 
::::I$(I25I$KI4r1. 
::NEST I 
: :yry-1] 
(SPRINT AZ ADAT TÖRÜLYE!" 
::FROC 2. VIZSSZALGRAS 

(PRINT SSRETÜRNÉG 

: :REPE.HT 
ezsséte ET Kő 
"UNTIL X$zCHF$(13) 

END FROC 
ú FROG INFO 


::REM $ WX 
: :REM IMFÜRMHEIÜK KEK: E 
aga :: REM EZEGVERETREKEEKREEEEEK 


2418 :: ESEL FEROGRHI-FEJLEC 
2426 ::IF v-f THEH FRINT"NINCS ADAT! !":CHLL 4. VISSZARUGRAL 
z499. : : PRINT"HANY KÜLÖCSSZÖ (1-5927" 
244 ::REPERT 
24981 : ET 
2468 : ; 
2478 sss z ALK KEZEK ESEL 
2480 :: EXEC FROGRHM-FEJLEL 
2490 ::IF Ss1 THEM CALL TOVAFE 
250698 ::FRINT"ES/VAGY KAPCSOÜLRT fE/4w97" 
2518 ::REFERT 
29298 ::::GET A$ 
2598 :: UNTIL A$zZ"ETOR A$-"7" 
zs4m ::vKszA$ 
2598 ::FROL TOVABB 
2568 : :PRINT"KEPERNYÜ VAGY FRINTER (K/PF27" 
2578 ::REPERT 
2589 ::::GET A$ 
2999 :: UNTIL S$zőK" ÜR A$-"P" 
2699 ::IF X$z-"K"THEN 0PEN1,3:ELSE:ÜPENI1.4 
261 ::AU$z4A$:PRINT NUPC"—", 287 
2628 ::FOR I-1T0 S 
2699 : : : :"PRINTI". KULCSSZO : "; 
2649 :::: INPUT S£(I? 
26290 ::MNEXT I 
26659 ::FÜR S151 TŰT 
Zerg :: ::1U15-A:FL-A 
26820 ::::FOR 5S2-1 Tü 5 
Z-PLACEA(S$(S29,I$(S12420 
:: IF 222A AND VK$-"v" THEN FL-1:EXEL KIVITEL 
:: IF 2-8 AHD VK$"E" THEN CALL NEXT S1 
:: IF 2228 AND VKÉ"E" THEN 11-11-41 
. 26 IF FL-1 THEM CALL NEX: 51 
, 2740 ::::NEXT SZ 
27538 :.:::IF UicS THEN EAEC KIVITEL 
2766" : : PROC MEXT §1 j 
2778 ::NEAT §1 
270 ::PRINT"KERESESNEK VEGE!" 
27998 ::TALL 4. VISSZALGRAS 
2809 ::PROC KIVITEL 


zgi9 ::::IF AU$-"K" THEM EXEC PROGRAM-FEJLEC 
2928 ::::PRINTH1, "INFO NR.":5S1 

2839 ::::PRINT$H1.DUP("-", 393 

2849 :::-PRINTH1.I£$(S1) 

28598 ::::PRINTH1.DUPRC"—" , 399 

2960 ::::PRINTHI 


297 ::::IF Al$z"P" THEN CALL 1. VISSZA 
: :" PRINT"52RETURNCC" 

:::::REPEAT 

:::t::::GET X$ 
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2919 ::::::UMTIL X$zCHR$t13. 
zgza : : : :PROC 1. VISSZA 

2939 ::END FROC 

2949 ::PROC 4. YVISSZRUGRAS 


2958 : : : :PRINTYÖRETÜRNXC" 
2968 : : : :REPERT 
2970 ::::::::GET X$ 


2998 CL0OSE1 

3049 END PROC 

3919 PROC PROGRAMVEG 

3029 ::REM $itkkkkkkekk 

3094 : :REM FROGRAMVEG 

3049 ::REM Hédedetetedketekkök 

3999 ::EXEC PROCRAM-FEJLEC 

3069 ::PRINT"BIZTOS BENNEfI/N29?" 

397a : : REPEAT 

3889 ::::BET A$ 

3898 ::UMTIL 4$-"I" ŰR 4$-"N" 

3197 ::IF /$-"N" THEN END FRÜC 

3119 ::EZEC FROGRAM-FEJLELC 

3129 ::FPRINT" A PROGRAM A":FRINT 

3139 ::PRINT" CALL MENU7TUTASIÍTASSÁL":PRINT 
3149 ::PRINT" UJRAIMDITHATÓ HNELKÜL HOGY" :PEINT 
3154 ::PRINT" AZ ANATOK ELYESZNENEK ! " 

3169 ::EMD 

3178 PROC FROGRAM-FEJLEC 

3199 ::REM EtXtEkEFKEKKEFE 

31950 : :REM PROGRAM-FEJLEC 

3299: : REM kiekedetetekek kette 

53219 ::FRINTCHR$(C1479; 

3229 : :PRINTDUP("-—" , 48. ; 

32399 : : PRINTCHRS8(1825" UNIVERZÁLIS IMHFORMACIO-—-" ; 
3240 : "PRINT RENDSZER " : CHR$(1462; 

325A :  PRINTDUPÁ"7-", 489; 

3268 PRINT" INFORMACIOK Sz.:"v" FILENEV: "IN$ 
J27a : :PRINTDUPC"z" , 409 

3220 : :PRINT:PRINT 

3298 END FROC 


Ezzel a programmal olyan információs rendszerhez jutottunk, amelyet a legkülönfélébb 
célokra hasznosíthatunk, ráadásul az eddig megismert egyéb utasítások alkalmazását 
is újabb példákkal szemlélteti. 

Indítsuk el a programot és nézzük, hogyan működik: 

A program hat lehetőséget kínáló menüvel jelentkezik. 


—1-— INFO-FILE BEOLVASÁSA 

Kiválasztása után először megkérdezi az info-file nevét. Itt azt a nevet kell beírni, amelyet 
előzőleg a tárolásnál a file-nak adtunk. Ezután választanunk kell, hogy új file-t akarunk-e 
létrehozni, vagy egy meglévőt kívánunk folytatni. Lehetőségünk van ugyanis arra, hogy 
egy meglévő file-hoz egy új file-t csatoljunk. Az így létrejött file-t új néven rögzíthetjük. 
Ha a program kijelezte a tárolt információkat, RETURN-nel visszatérhetünk a menühöz. 


—2— INFO-FILE TÁROLÁSA . 

Ha ezt a lehetőséget választjuk, de a tárban nincs adat, a NINCS ADATI-hibaüzenetet 
kapjuk. 

Amikor a file nevét beadtuk, a program a file-t lemezre viszi. 

Figyelmeztetés: A lemezen esetleg azonos néven szereplő file felülíródik! 

A menühöz a RETURN-nel térhetünk vissza. 
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—3- ADATRÖGZÍTÉS 


Ezt a funkciót akkor választjuk, ha egy file-ba először akarunk adatokat rögzíteni, vagy 
egy már meglévő file-t bővíteni akarunk. Abban az esetben, ha nincs tárolt információ, 
a program rákérdez a file nevére, majd ezt az információk számával együtt kijelzi a 
fejlécben. ; 

Amikor a file-nevet beírtuk, a képernyőn megjelenik a beviteli maszk és beadhatjuk a 
max. 2 képernyősor hosszúságú információ-mondatot. A program a rögzítés előtt feltesz 
egy ellenőrző kérdést a beadás helyességére vonatkozóan. Ha erre "N"-nel válaszolunk, 
megismételhetjük a beírást. Helyes beírás esetén a program megkérdezi, hogy aka- 
runk-e még adatokat rögzíteni. "I"-re megismétlődik az alprogram, "N"-re visszatérünk 
a menühöz. 


—4- ADATOK TÖRLÉSE 


Természetesen lesznek olyan adatok (pl. határidők), amelyek egy idő után feleslegessé 
válnak és ki kell törölni őket a file-ból. Ez az alprogram a rekordok célirányos törlését 
végzi. Ehhez be kell Írnunk az információ sorszámát. Ha esetleg nem ismerjük, segítségül 
kell hívnunk a —6-—-os alprogramot (PROGRAM VÉGE). 

Mielőtt a rekord törlődne, teljes egészében megjelenik a képernyőn és így eldönthetjük, 
hogy valóban törölni akarjuk-e. Amennyiben nem, úgy "N"-nel visszatérhetünk a menü- 
höz. 

Figyelmeztetés! Törléskor átszerveződik a file. A törölt rekordot követő rekordok egy 
hellyel előrébb kerülnek. 


-5- ADATOK KERESÉSE 


Ez a rész a program lényege: A legnagyobb file is használhatatlan, ha nem tudjuk belőle 
rövid idő alatt kikeresni a szükséges információkat. Annyit ér, mint egy telefonszámok 
szerint rendezett telefonkönyv. 

Ez az alprogram biztosítja a file egyszerű kiértékelését és nyomtatón vagy képernyőn 
történő megjelenítését. 

A kiválasztást követően meg kel! adnunk, hogy a rekordban hány kulcsszó szerint (1—5) 
keresünk. Ha egynél többel, akkor el kell döntetünk, hogy azokra ÉS, ill. VAGY kapcsolat- 
ban van-e szükségünk. Pl.: ha két címszót keresünk, akkor a rekordnak ÉS kapcsolat 
esetében mindkettőt, VAGY kapcsolatban pedig legalább az egyiket tartalmaznia kell. Az 
erre vonatkozó kérdésre "E"-vel, ill. "V"-vel kell válaszolni. Maximálisan 5 kulcsszó 
szerint kereshetünk. 

Ha a logikai műveletre vonatkozó kérdést megválaszoltuk, meg kell választanunk a kivitel 
módját (képernyő vagy nyomtató). 

Végül írjuk be a kulcsszavakat. 

A program végét a képernyőn megjelenő üzenet jelzi. 

A menühöz a RETURN-nel térhetünk vissza. 


-6- PROGRAM VÉGE 

Egy ilyen példásan megírt programtól joggal elvárhatjuk, hogy ne a RUN/STOP billentyű- 
vel lehessen kilépni belőle. Ez az alprogram befejezi a programot, de előtte válaszolnunk 
kell arra a kérdésére, hogy valóban nem akarunk-e már tovább dolgozni (BIZTOS ÖN 
EBBEN? I/N). Ha "N"-nel válaszolunk, visszatérünk a menühöz, míg "1I"-re a program 
befejeződik, de a képernyőn megjelenő üzenet szerint az adatok elvesztése nélkül újra 
indíthatjuk. 

Nos, kihasználva a CBM 64-es tárolóját, elkészíthetjük saját adatbankunkat. 
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8.4 DUP - füzér ismétlése 


Formátum: — DUP ("füzér", n) 
Paraméterek: füzér — valamilyen füzér vagy füzérváltozó 
n -— szorzótényező 
Funkció: Egy füzér meghatározott számú ismétlése 
Példa: PRINT DUP (7—" 40) 
A képernyőn egymás után kiír 40 db 7"—" jelet. 


Ezzel az utasítással leegyszerűsíthetjük pl. egy szövegrész aláhúzását és megmenekü- 
lünk egy csomó értelmetlen billentyűzéstől. Ráadásul nem csak egy-egy karakter ismé- 
telhető, hanem több karakterből álló füzér is. Például: 


10 A$ — DUP ("SOS",10) 
20 PRINT A$ 


A paramétereket változóként is megadhatjuk: 


10 A$- "SOS" 

20 FORI-1TO 10 
30 PRINT DUP (A$,1) 
40 NEXT 


Az utasítást vezérlőkarakterekre (pl. kurzorvezérlő) is alkalmazhatjuk: 

10 PRINT "10.SOR" 

20 PRINT DUP (CHR$(145), 10) 

30 PRINT "30.SOR" 
(A CHR$(145) a KURZOR FEL ASCII-kódja). 
Nincs szükség tehát arra, hogy a kurzor többszörös pozicionálásához ciklust szervez- 
zünk. 
A következő lista azt szemlélteti, hogy az utasítás nyomtatón is alkalmazható, pl. feliratok 
aláhúzásánál. ű 

10 OPEN 1,4 

20 PRINT$1,DUP("—" ,80) 

30 CLOSE 1 


A DUP tehát megint egy olyan utasítás, amelyre már régóta vártunk. 
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8.5 Ellenőrző kérdések 


1. Mi az eredménye a következő programnak? 


10 A$— "AAA BBB CCC " 
20 PRINT INSERT ("7 XXX" ,A$,4) 


a) AAAXXX BBB CCC 
b) AAA XXX BBB CCC 
c) AAA XXXBBB CCC 


2. Milyen szabályok érvényesek az INSERT-utasítás alkalmazásakor? 


a) A belső füzér kisebb legyen a külsönéli. 
b) A belső füzér nagyobb legyen" a külsőnél. 
c) A létrejött új füzér hossza max. 255 karakter lehet. 


3. Az alábbi INSERT-utasítások közül melyik eredményezheti a KLAGENFURT feliratot? 


a) 10 PRINT INSERT(/LAGENF","KURT", 1) 
b) 10 PRINT INSERT(/LAGENF","KURT",0) 
c) 10 PRINT INSERT("LAGENF","KURT"2) 
d) Egyik sem. 


4. Mi az eredménye a következő programnak? 


10 A$— "AAABBBCCCDDD" 
20 PRINT INST (7 7", A$,4) 


a) AAA BBBCCCDDD 
b) AAA BBCCCDDD 
c) AAAB BECCDDD 
d) AAA BBCCCDDD 


5. Melyik pozíciót jelzi ki az alábbi utasítássorozat? 


10 A$—"7AA BB CC" ts 
20 PRINT PLACE (7 " A$) 

a) 1 

b) 2 

0) 3 


6. A következő utasítások közül, melyiknek nem 12 az eredménye? 
a) PRINT PLACE(7 " "AAA.BBB.CCC DDD.EEE") 


10 
b) 10 PRINT PLACE XY" YX.XY XX YXY XX) 
c) 10 PRINT PLACE("1007,"10001000101001007) 
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fé 
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A következő utasítások közül melyiknek nem ez az eredménye: 


a) PRINT DUP ("7—",12) 
b) PRINT DUP (7——",4) 
c) PRINT DUP ("/————"3) 


. Vezérlőkarakterek ismétlésére alkalmas-e a DUP-utasítás? 


a) igen 
b) nem 


. Hány karakter lehet a DUP-pal előállított jelsorozat hossza? 


a) 256 
b) 1000 
c) 255 
d) 1024 


9. FEJEZET 
Megjelenítés — (kivitelyvezérlés 


A Simonss Basic nagyon sok segítséget nyújt a képernyőn megjelenő információk formá- 
tumának alakításában. Ebben a fejezetben olyan utasításokkal ismerkedünk meg, ame- 
lyekkel a program külső megjelenítése profi szinten történhet. 

Lehetőségünk nyílik a megjelenés formálására, villogtatásra, vagy teljes képernyőrészek 
kezelésére. Először a formáló, majd a villogtató és a gördítés (scroll) utasításokat 
ismertetjük. A gyorsabb elsajátítás érdekében, lehetőség szerint a tanulással együtt 
próbáljuk is ki az utasításokat. 


9.1 Formált megjelenítés 


Formált megjelenítésen azt értjük, hogy a képernyőn megjelenő szövegek, számítások, 
... Stb. az általunk meghatározott alakban jelenik meg. Az eredeti CBM BASIC-ben is van 
néhány utasítás a képernyő tartalmának áttekinthetőbbé tételére. Ezek a PRINT-tel együtt 
alkalmazandók (a POS kivételével). Ezeknek az utasításoknak a funkcióját és az abból 
adódó lehetőségeket az alábbiakban röviden vázoljuk. 

Elsőként egy lényeges fogalmat tisztázunk: 


Kurzor 


Azt a pozíciót jelöli a képernyőn, ahová a következő karakter fog kerülni. Két megjelenési 
módja van. Közvetlen üzemmódban jól látható villogó kis négyzet, program üzemmódban 
viszont láthatatlan, csak virtuálisan van jelen, így mutatja az aktuális képernyő pozíciót. 
Ezért, ha kurzorpozícióról beszélünk, akkor az mindig a következő kiírandó karakter 
helyét jelenti. 


SPC 


Üres helyet hagy ki az aktuális kurzorpozíció és az azt követő szöveg között, tehát a 
képernyői kivitel relatív pozícionálására szolgál. 


TAB 


Meghatározza a sornak azt az oszlopát, ahonnan a következő karakter kerül. Itt tehát 
abszolút pozícionálásról beszélünk. (lásd az AT-utasítást is). 


POS 


A pillanatnyi kurzorpozíció meghatározására szolgál. Segíti a képernyőn való tájékozó- 
dást, és nagyon hatákonyan alkalmazható a SIMON S BASIC-ben a LIN-utasítással 
együtt. 

Hb 

A PRINT utasítást követően automatikusan végrehajtásra kerül egy kocs: vissza (carriage 
return) pozícionálás. Mint tudjuk, a PRINT utasítás befejezhető vesszővel vagy pontos- 
vesszővel. 

Ha pontosvesszővel fejezzük be a PRINT utasítást, akkor szóköz nélkül, folyamatosan 
folytatódik a kivitel, ha a vesszőt használjuk, akkor automatikus tabulálást végez a gép. 
Ezek után nézzük a SIMON S BASIC kiegészítő utasításait. 
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9.1.1 CENTRE - szöveg elhelyezése középen 


Formátum: CENTRE kf 
Paraméterek: kf — karakterfüzér, vagy sztringváltozó, a hossza — 49 


Funkció: egy füzért a képernyősor közepén jelenít meg 
Példa: CENTRE A$ 
vagy 


CENTRE"SIMON s BASIC" 


A CENTRE-utasítással a képernyősor közepére pozícionáljuk a megjelenítést. 

Pl. a "Commodore 64" feliratot a képernyő közepére szeretnénk kiíratni. 

A rendes BASIC-ben, ehhez előbb meg kell számolnunk a karakterfüzér hosszát, ezt 
levonjuk a soronkénti 49 karakterszámból és a maradékot osztjuk kettővel, így kapjuk 
meg a felirat előtti üres helyek számát. 

A CENTRE utasítás megkönnyíti a munkánkat, mert automatikusan kihagyja az üres 
helyek számát. A kiírandó szöveg nem lehet hosszabb, mint 39 karakter, különben a 
kivitel véletlenszerű lesz. A kurzor a kivitel után közvetlenül a felirat utáni pozíción áll, 
és ha a következő sorba szeretnénk írni, előbb egy PRINT vagy PRINT CHR$(13) formá- 
ban egy (carrigae return -t kell végrehajtani. 

A CENTRE " " — utasítással pozícionálható a kurzor anélkül, hogy írnánk valamit. A ké- 
sőbbi kiírást ettől a helytől folytathatjuk. 

Ha a CENTRE utasítást követően közvetlenül beírunk egy másikat, akkor a második kivitel 
pontosan olyan távolságra kerül az elsőtől, amennyi üres hely volt ez előtt. Ezt ügyesen 
használhatjuk arra, hogy a megjelenítendő karakterek állandó távolságra legyenek egy- 


mástól. 
Nézzük a következő példát: 


P. 28 


1 REM dededetedee dése desk eki 

2 REMXCEMNMTREXK 

3 REM HEKEkkkk bekk eték 

199 REM 

114 PRINT CHR$-1472:REM KEFERNYOTORLES 
120 A$-"SIMON7S BASIC" 

158 B$-"A CBM 64-HEZ" 

140 CENTRE A£$:FRINT 

159 CENTRE B$:PRINT 

169 CENTRE "AEYMKKNekkkkk 
179 REM 

189 REPI Hédédeséteteeeskakik 

199 REM KIEGESZITES 

ZOON REM Mélédéeegestesedegezksk 

210 PRINT 

229 FÜR X-15 TŰ 1 STEP -Z2 
2ezs PHUSE 1 

230 CENTRE DUPÁ "3", X2: PRINT 
240 NEXT 5 


A példa első részében egy feliratot írtunk ki képernyő közepére, a másodikban pedig egy 
szép effektust mutattunk be. 


9.1.2 USE - a tizedespont pozícionálása 


Formátum: USE 1. kf., 2. kf. 
Paraméterek: 1. kf. — karakterfüzér vagy füzérváltozó, 
formátuma: "Hif.étifb vagy 
"Hi4 szöveg.4/§4 "szöveg" 
2. kf. — karakterfüzér vagy füzérváltozó, numerikus értékkel 
Funkció: Numerikus értékek megjelenítése a tizedespont pozícionálásával 
Példa: " USE "48.44", "129.345" 
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Az USE utasítás a tizedestörtek táblázatos kiírásához nyújt segítséget. Anélkül, hogy 
minden egyes számnál meg kellene állapítani a tizedesjegyek helyét, egymás alá kerülő 
tizedespontokkal ábrázolhatjuk a különböző számítások eredményét. 

A kiírási formátumot az 1. füzérrel adjuk meg. Minden 7 jel, a kijelzett szám egy decimális 
helyét jelenti. Ha a tizedespontig nincs számjegy, akkor annyi üres hely lesz a kivitelnél, 
ahány f jel van a tizedespontig. Ugyanez érvényes a vessző (pont) utánra is. Ha viszont 
a tizedestört hosszabb a kijelölt formátumnál, akkor a fölösleges karakterek elvesznek. 
Erre különösen figyeljünk, és ha kell, kerekítsünk. 

A ,Paraméterek" címszó alatt megadott helyeket természetesen szöveggel is megtölthet- 
jük, ha szem előtt tartjuk a pont és a § jelek szerepét. 

A szöveget mint egyszerű karakterfüzért és mint füzérváltozót is beadhatjuk. 

A 2. füzér a formatálandó tizedesértéket tartalmazza, és ezt előzőleg az STR$ ( ) utasítás- 
sal füzérré kell alakítani. 

Ha ugyanabban a sorban szöveget és formálást is alkalmazunk, hiba léphet fel a formá- 
lásban, ha a tizedespont utáni utolsó számjegy 0. 

Ezt úgy kerülhetjük el, hogy a szöveget PRINT-tel írjuk, és USE-val kapcsoljuk hozzá a 
formálást. 


P. 29 


1 REM kitFEkkkkkk 

2 REMKIUSEwx 

3 REM sétédeteeteeskk tek 

108 REM 

119 PRINT CHR$(1472):FREM KEFERNYOTOÖRLES 
129 HSzöttttt. tát" 


139 Az12.32 

140 E5230.14 

150 USE "IRUDASZER: "4A$,STR$(CAD:PRINT" FT" 
160 USE "KONYVEK: — "4A$,STR$C(B):PRINT" FT" 
179 PRINTY—-———— een 


199 USE "ÜSSZESEN: "$A$,STR$(HAHB2D:PRINT" FT" 


A példában a most ismertetett utasítás egy érdekes alkalmazását mutattuk be. 
Ha a 130. és a 140. sorban A és B értékét 12.30-ra ill. 230.10-re változtatjuk, a fent említett 
formálási hibát is tapasztalni fogjuk, melyet elkerülhetünk, ha a programot így módosít- . 
juk: 

P. 30 

1 REM KEXGERKEHKKKK 

2 REMXZUSE$ 

3 REM delétetétetedet kek 

199 REM 

119 PRINT CHR$(147) : REM KEPERNYOTORLES 

129 ASZ HERHEHEHEEHH E. HT 


129 A-12.30 

149 B-239.18 

158 PRINT"IRODASZER: ":USE A$, STR$CAJ:PRINT" ET" 
168 PRINT"KONYVEK: — ":USE A$,STR$CB):PRINT" FT" 
í7d PRÍNTt——e—sesegésészzes e 

199 PRINT"ÖSSZESEN: ":USE A$.STR$F(FAHE):PRINT" FT" 


Kis szépséghibája ennek is van, aki gondolja, tovább kísérletezhet! (—- a magyar változat 
készítői). 


9.1.3 AT -— füzér kivitele pozícionálással 


Formátum: PRINT 1. kf AT(o,s) 2. kf 
Paraméterek: 1. kf/2. kf — két kiírandó karakterlánc, vagy füzérváltozó, ahol az í. kf el is 
hagyható 
o — oszlop 
s-sor 
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Funkció: Füzér pozícionált kivitele 
Példa: PRINT AT(10,12)"CBM 64" 


A PRINT-tel aktivizált AT-utasítás lehetőséget ad arra, hogy a képernyő tetszés szerinti 
részébe helyezzük a 2. kf címen megadott füzért. Az o és s paraméterek a kurzor kezdő 
koordinátáit, vagyis a kiíratás kezdő helyét jelöli. Ez esetben is érvényes, hogy minden 
további kiíratás a pozícionált füzér utolsó karakterét követően jelenhet meg. 

Ha a 2. kf üres füzér, akkor ez egyszerű, kivitel nélküli kurzorpozícionálást jelent. 
Természetesen a 1. kf-rel a régi helyre is írhatunk szöveget. 

Az AT-utasítás egyik különösen érdekes felhasználási területe a kis felbontású grafika 
(LGR-LOW-RESOLUTION-GRAPHICS). Ehhez "pontként" a Commodore 64-es bármelyik 
karakterét felhasználhatjuk. Az AT utasítás felhasználási köre az állandó próbálkozások 
során egyre bővül, tehát rendkívül hasznos és sokoldalúan alkalmazható. 

Egy utolsó megjegyzés a formátumhoz: A zárójel az utasítás részét képezi, ezért az AT 
utasításszó és a "(7-jel közé nem szabad szóközt (space) tenni. 

A példaprogram: 


P. 31 

1 REM kikkttk 

2 REM$XAT:$ 

3 REM $itkkkt 

198 REN 

118 REM $ktkkkkkk 

128 REM 1. FELIA 

130 REM $E4EEHEK 

148 REM 

159 PRINT CHR$(1472:REM KEFERNYÜ TÖRLES 
160 PRINT AYK19.52 "IGY MUKODIK " 
179 PRIMT AT(15.192"AZ 7AT7—" 

194 FRINT ATA(1€.155"FUNKCIÓ !" 

199 PARUSE 5 

299 REM 

218 REM kititkkEH 

224 REM 2. PELOR 

230 REM kikkxkkk 

249 REM 

259 PRINT CHR$(1475:REM KEFERNYO TÜRLES 
269 FOR 5-6 TŰ 24 $ 

274 PRINT AT(A.X2"SIMOM7S BASILZ" : 
za NEXT A 

298 PRINT AT(3.2A2" " 

308 FALSE 5 

318 REM 

320 REM $étkeökiekkök 

399 REM 3. PELBHA 

348 REM kitkökkkk 

saA REM 

368 PRINT CHR$(1479:REM KEPERNYO TÜRLES 
37A FOR Xx-9g TŰ 38 

399 FRINT ATA(AS12XSINCx/62t12) "4" 
3998 MEXT A 


Az előbbi példákkal bemutattunk néhány alkalmazási lehetőséget az egyszerű és formált 
szövegkiviteltől a grafikus felhasználásig. 

Fel kell hívnunk a figyelmet arra, hogy az AT utasítással csak a képernyői kivitelt 
vezérelhetjük. Nyomtatón csak a HRDCOPY utasítással együtt működik (lásd: 12.2.2 
alfejezetet). 

Közvetlen kinyomtatás esetén a CMD vagy PRINT; kiadásakor az ÁT utasítás hatástalan- 
ná válik és a 2. kIl a régi nyomtatási pozíciótól kezdve kerül kiírásra. 
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9.1.4 LIN — a kurzort tartalmazó sor 
Formátum:  LIN (függvényként) 


Paraméterek: — 
Funkció: A kurzor sorának meghatározása 
Példa: A — LIN 


ALIN azon utasítások egyike, melyek nem egyedül szerepelnek, hanem - a SIN vagy SOR 
utasításhoz hasonlóan - függvények. Ezekkel további számításokat lehet végezni, vagy 
értéküket egy változóban tárolni (pl.: A- LIN). 

A LIN utasítás segítségével könnyen meghatározhatjuk azt a sort, amelyben a kurzor 
található. 

A POS utasítás alkalmazásával az eredeti Commodore-BASIC lehetővé teszi a kurzor 
soron belüli helyének meghatározását. A kurzor sorát azonban nem lehet megadni. Ez 
a hiányosság megszűnik, mert a POS és LIN utasításokkal pontosan meghatározhatjuk 
a kurzor pontos koordinátáit és számításainkban, képernyőterveinkben felhasználhatjuk. 
Ügyeljünk a két utasítás eltérő szintaktikájára! 


P. 32 


i REM $tttxEtdkök 

2 REMKELIHNE: 

3 REM Kiktkkkkék 

109 REH é 

118 PRINT CHR$(147":REM KEPERNYÜ TÜRLES 
129 AELIN , 

194 FÜR Az1 TŰ 29 

144 PRINT"EZ A" LIN CHR$(ZA2 ". SOR" 
158 NEXT A 

1€6 PRINT 

174 PRINT"AZ"R"-"LIN" SOROKBA IRTUNK." 


Ez a példa csak a LIN utasítás működésének bemutatására szolgál. Használatát program- 
Írás közben gyakorolhatjuk be leginkább. 


9.1.5 PAUSE - a program késleltetése 


Formátum: — PAUSE kI,s vagy PAUSE s 
Paraméterek: kI — karakterlánc vagy füzérváltozó, amely valamilyen megjegyzést tartal- 


maz 

s -— a várakozási idő másodpercben 
Funkció: A programfutás késleltetése "s" másodperc időtartamig 
Példa: PAUSE "KÉSLELTETÉS" 3 


Amit egyébként csak körülményesen, késleltető ciklusokkal tudnánk megvalósítani, azt 
most a PAUSE utasítással egyetlen sorban megoldhatjuk. 

Az utasítással a programfutást egy bizonyos ideig — mely időt "s"-sel (egysége a secun- 
dum) lehet megadni - felfüggeszthetjük. Ezenkívül a várakozás okát is megadhatjuk. 

A program alkalmazása során a késleltetést a (RETURN)?-nel megszakíthatjuk, és a 
program folytatódik. Ha a program éppen ezt az utasítást hajtja végre, a (RUNSTOP? 
billentyűvel nem szakítható meg, csak a RUNSTOP/RESTORE vagy a (RETURN)? majd 
(RUNSTOP?) billentyükkel. 

Ez az utasítás jól használható a programok hibajavításánál, pl.: közbenső értékek kijelzé- 
sére vagy a nagyon gyors folyamatok lassítására. 

A PAUSE mintapélda 4 másodperces időközökben 16-szor változtatja a háttérszínt. 
A szünetet (várakozási időt) a RETURN-nel megszakíthatjuk. 

Jó szórakozást a programozáshoz! 
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P. 33 

1 REM $ttkttEFEFK KIK 

sze REPL KT EGB ÜSSE EE 

3 REM E4E4EFEKEEKEKK 

iam REM 

110 FRINT CHR$C(3):REMH FEHER KARAKTEREK 
129 FOR 2-0 TŰ 12 

130 PÜKE 532439433.5:REM HATTERSZIH 

146 PRINTCHR$C(147."TUVABB CRETILRM3-HNEL" 
158 FRINT 

166 PALSE "S2IN-SZAM"4STRECAZ 4 

174 MNEXT A : 


9.1.6 Ellenőrző kérdések 


Most pedig következik a szokásos teszt. (A megfelelő választ, melyből több is lehet, be 
kell karikázni.) 


18 


Mire kell ügyelni a CENTRE-utasítás használatánál? 


a) A CENTRE után nem szerepelhet PRINT utasítás. 
b) PRINT-tel kell elválasztani két CENTRE utasítást. 
c) A beírandó füzér legfeljebb 40 karakteres lehet. 


Szintaktikusan mely utasítások helyesek? 


a) PRINT CENTRE "ABC" 

b) PRINT AT(2,4) "CBM 64" 

c) PRINT AT(2,4) "CBM 64" 

dd A- LIN 52 

e) PAUSE 5, "NYOMJA LE A RETURN-T" 
f) USE" HFT, 44 F", STR$(123,34) 


. Milyen utasítást kell használni, ha a képernyő közepén akarunk két csillagot megjele- 


níteni? 


a) PRINT "er" 

b) CENTRE "ex" 

c) PRINT AT(19,12)7m" 

d) A$—"4":PRINT AT(0,12)"":CENTRE A$ 


A megoldások a könyv végén találhatók! 
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9.2 A képernyő villogtatása 


A SIMON s BASIC kifejlesztője még olyan szép effektusok létrehozására is gondolt, mint 
a villogó képernyői kijelzés. 

Segítségével lehetőség nyílik a fontosabb információk kiemelésére, de játékként is 
szolgálhat. Felhasználása a "komoly" programoktól egészen a játékig terjed. 


9.2.1 FLASH -— egy szín villogtatása 
Formátum: sz — a villogó szín kódja (0—15) 

v — a villogás sebessége (0—255) 
Funkció: Valamelyik képernyőszín villogtatása 
Példa: FLASH 4,10 


A FLASH utasítás lehetővé teszi minden olyan karakter folyamatos villogtatását, amelyik 
egy adott színben jelenik meg a képernyőn, "v" villogási sebességgel. Ez azt jelenti, hogy 
a karakterek felváltva normál, ill. inverz formában jelennek meg a képernyőn. Az sz a 
villogtatni kívánt karakterek színét jelenti, értéke 8 és 15 között változhat. 

Az egyes értékekhez a következő színek tartoznak. 


0 — fekete 8 — narancs 

1 — fehér 9 — barna 

2 — vörös 10 — világosvörös 
3 — türkiz 11 — szürke 1 

4 — ibolyakék 12 — szürke 2 

5 zöld 13 — világoszöld 
6 5: kék 14 — világoskék 
7 — sárga 15 — szürke 3 


A v sebesség egysége kb. 1/60 másodpercnek felel meg. (1 másodperc pontosan v—58- 
cal egyenlő.) 

A v-0 ugyanaz, mint a v— 256. A sebesség beállításához az alábbiakat célszerű figye- 
lembe venni. 

Ha v értéke nagyon kicsi (v C 10) a villogás túl gyors lesz, a gép túltelítődik és az egész 
képernyő villogni fog. A BASIC program lassul és ezzel párhuzamosan v értéke nő. 
A képernyő tehát sohasem fog 1/60 másodperces gyakorisággal villogni. 

Problémák adódhatnak a tv-készülékkei vagy a monitorral is, mivel a számítógép a 
filmfelvevőhöz hasonlóan 1/20 másodpercenként állít elő új képet. A gyakorlás érdeké- 
ben próbáljuk ki a fellépő effektusokat (sávok és megszakítások). 

A FLASH utasítás használatánál még egy fontos apróságra oda kell figyelnünk. 

Ha a villogtatás bekapcsolása után a kérdéses színnel újabb szöveget írunk a képernyő- 
re, előfordulhat, hogy az részben vagy egészben fordítva villog, vagyis az eredeti szöveg 
normál állapotánál inverz és fordítva. Ennek az az oka, hogy a számítógép függetlenül 
a villogási helyzettől, normál üzemmódban (ill. a RVS/ON aktiválása után inverzben) ír 
és ha az átfordítás pillanatában a régi szöveg éppen nem a normál ábrázolási módban 
jelenik meg, előáll az említett fordított villogás. Ugyanez az oka annak, hogy a FLASH 
bekapcsolását követően az inverz feliratok ellentétes fázisban villognak. 


9.2.2 OFF - a villogás kikapcsolása 
Formátum: OFF 


Paraméterek: — 
Funkció: A FLASH üzemmód kikapcsolása 
Példa: a. 28FE 


A FLASH-sel bekapcsolt villogás az OFF utasítással szüntethető meg. Ilyenkor mindig a 
pillanatnyi villogási helyzet állandósul. Tehát ha a villogtatott karakterek éppen inverz 
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állásban jelennek meg, az OFF végrehajtása után Így is maradnak, és fordítva. Ezért ha 
az OFF utáni állapotot rögzíteni kívánjuk, akkor az a legjobb, -ha töröljük a képernyőt a 
CHR$(147)-tel és utána újraírjuk. 

Alapszabály, hogy minden FLASH után következzen valahol - de legkésőbb a program 
végén - egy OFF utasítás, különben a képernyő a program befejezése után tovább villog. 
Példa a FLASH-OFF utasításpárra: 


P. 34 

1 REM Fielétédedeté ke e eket 

2 REM$FLRSHE 

3 REM E4X4EFEKKEKKET 

104 REM 

119 FÜKE53248433, ü:FOKE5S3248432 , B8:REM HATTER-/KERETSZIN 
120 PRIMTCHR$(147)CHR$r158) :REM KEPERNYOTÜRLES $SZINZSARGA 
128 CENTRE "VARJON AMIG A READY MEGJELENIK" :PRINT 

148 CENTRE "VAGY TARTSA LENYONMYA FR RETURN-T " 

159 PRINT AT(A.82 "":REM KURZOR POZICIONALAS 

1€9 CENTRE "tttttttttttttttttttt teát tett átt tát tb b §tHb" : PRINT 

174 CENTRE "tettttttttttttát tetett áttett HE" : PRINT 


CEMTRE "tt 
CENTRE "ittHttt 
CENTRE "ttittit 
CENTRE "HHH 


ká dáli 
Hitt" 
Hitt" 
tásásáli 


:PRINT 
:PRINT 
:PRINT 
:PRINT 


229 CENTRE "HHHRHH HEHEHEHEH HE": PRINT 
238 CENTRE "Hittel EE HEHEHEHEH" : FRINT 
248 PRINT ATCA. 199 CHR$(3129:REM KEK 


258 CENTRE" :FRIHT 
260 CENTRE" COMMODORE 64 ":PRINT 
279 CENTRE" SIMON7S BASIC ":PRINT 
280 CENTRE" ": PRINT 


29a FOR X-1A TŰ 1 STEP -1 

399 FLASH 6€.X:REH VILLOGO KEK SZIN 

319 PAUSE 2 

329 MEXT A 

338 0FF 
Példaprogramunk a FLASH és OFF, valamint az egyéb kiíró utasítások együttes használa- 
tát mutatja be. Miután a képernyő és a keret feketére vált, megjelenik egy sárga keret 
(160-230. sor) közepén kék felirattal (260-270. sor). A felirat azonnal villogni kezd, a 
villogás egyre gyorsul, majd a legnagyobb villogási sebességnél megszűnik. 
Ugye látványos? 


9.2.3 BFLASH - a keret villogtatása 
Formátum:  BFLASH V, SZ1,5Z2 
Paraméterek: V — a villogás sebessége 

SZ1/SZ2 - a villogásban egymást váltó két szín 
Funkció: A képernyőkeret színének változtatása a két szín között 
Példa: BFLASH 30,12,14 
A BFLASH utasítás segítségével különböző villogási effektusok állíthatók elő, melyek pl. 
a számítógépes játékok különleges helyzeteit (találat, győzelem stb.) kiemelik vagy a 
figyelmet egyszerűen a képernyő tartalmára irányítják. 
A BFLASH a keret színét váltogatja meghatározott gyakorisággal anélkül, hogy beavat- 
koznánk (lásd FLASH). A v paraméter itt is a frekvencia beállítását szolgálja. A paraméter 
jelentése, számítása megegyezik a FLASH utasításnál leírtakkal. A másodpercenkénti 
színváltáshoz v-t 60-ra kell beállítani. (Egy megjegyzés: az előbbi szám csak irányérték, 
a valóságban v— 58 esetén vált másodpercenként a képernyő.) Mivel azonban a keret 
színcseréje egy egyszerű POKE utasítással történik, a színváltás nagyon gyors is lehet 
(0cv c 10). Tehát a FLASH-sel ellentétben itt tényleg megvalósulhat az 1/60 másodper- 
cenkénti váltás. A tv-kép azonban csak 1/20 másodpercenként vált, így nagyon érdekes 
sáveffektusokat idézhetünk elő. 
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A két további változó a villogásban egymást váltó két színt jelöli. A FLASH utasításnál 
megismert táblázatot kell használni. 

Itt a következőkre kell figyelni: 

Ha a két szín erős kontrasztkülönbséggel (pl. fekete-fehér) változik, akkor ez kihat a 
képernyő belső részére is. 

A világos szín elvesz a képernyő színintenzitásából, míg a sötét szín felerősíti azt. Ezáltal 
a háttér együttvillogását figyelhetjük meg, különösen fényszegény (pl.: fekete) háttérszín 
esetén. 

Ezt az esetet tanulmányozhatjuk a BFLASH 0 utasítás 1 példaprogramján. 


9.2.4 BFLASH 0 - a villogás kikapcsolása 
Formátum:  BFLASHO 


Paraméterek: — 
Funkció: A BFLASH üzemmód kikapcsolása 
Példa: BFLASH 0 


Funkciója megegyezik az OFF utasításéval, de a FLASH utasításra vonatkozóan: kikap- 
csolja a keret villogását. Elég bizonytalan, hogy a két szín közül melyik állandósul, ezért 
ajánlatos a keretszínt a POKE 53248--32,5z paranccsal újra megadni (sz— színkód). 
A BFLASH a programban bárhol szerepelhet, de legkésőbb a program végén be kell 
hívni, különben a FLASH utasítás a program befejezése után is érvényben marad. 
Példák a BFLASH és a BFLASHO utasításokra: 


1 Példa: 
Helyettesítsük a FLASH-program 300. és 330. sorát a következőkkel: 


300 BFLASH X,6,7:REM KÉK-SÁRGA VÁLTAKOZÁS 
330 BFLASH 0 
2 Példa: 


P. 35 


1 REM $EXEEEEERÉE Kek 

2 REM$EBFLASHA: 

3 REN kittkkkkk desk egek 

186: REM 

119 POKE 53248433.2:REM VOROS HATTER 

128 BFLRSH 1.7.6:KEM YVALTAKOZÓ 52ZINEK-SARBR-KEK 

139 PRINTCHRSE(S.CHR$(147) ::REM FEHER KARAKTEREK 4 KEPERNYŰÜ TÖRLES 

140 FÜR XA-ú TŰ 239 

158 Y-X/z 

169 PRINT ATÁ(X.5YV2"k":REM EGYIK ATLO 

170 PRINT AT(39—4,v2"$":REM MASIK ATLO 

1988 PRINT ATÁAZ,A2"4":REM FELS( VIZSZIMTES 

198 PRINT AT( Aa2"x":REM ALSO VIZSZINTES 

29A PRINT ATÁAB.VY2"X":REM BAL FUGGOLEGES 

219 PRINT AT(39.Y2"£":REM JÚBBE FUGGOLEGES 

220 NEXT X:REMH KÜVETKEZŰ FONT 

220 FLASH 1.15 

240 FRINT AT(3.ADEÉCHR$C15A) : REM POZICIOÓNALAS ES SZÜVEG; YILAGOSVOROS 

250 CENTRE "CSODÁLKOZIK?" :FRINT 

260 CENTRE "SEHMISEG!" 

270 FRINT AT-(A.245"":REM READY, / POZICIONALASA 

289 PARUSE £:REH € MRSÜDFERC VARAKOZAS 

298 EFLASH § 

348 0FF:REM VILLOGAS KIKHAFCSÜLASA 
A fenti példán tanulmányozhatjuk a FLASH, BFLASH, OFF BFLASH 0 és néhány egyéb 
SIMON ss BASIC utasítás lehetséges kölcsönhatását. Próbáljuk meg megfejteni az egyes 
programrészek működését. A különböző utasítások megértéséhez a 140—220. sorokra 
nincs feltétlenül szükség. A programmal könnyen játszadozhatunk, ha egyes paraméte- 
reit váltogatjuk. Próbáljunk ki mindent nyugodtan. 
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9.2.5 Ellenőrző kérdések 


Végül nézzük, mit tanultunk: 


ls 


86 


Melyik utasítást használjuk, ha a keretszínt fehér és kék között, másodpercenként kb. 
egyszer kell változtatni? 


a) BFLASHO 

b) FLASH 0,1 

c) BFLASH 60,1,0 
d) BFLASH 0,1,1 


. Be akarjuk fejezni a vörös karakterszín villogását. Melyik utasítást kell választanunk? 


a) BFLASH 0,0,0 
b) BFLASH 0 

c) OFF 

d) FLASH O 


. Mit tegyünk, ha a szövegek csak egy bizonyos részét akarjuk a FLASH utasítással 


villogtatni? 


a) Először leírjuk a villogtatandó szöveget, bekapcsoljuk a villogást, végül beírjuk a 
hátralévő nem villogó szöveget. 

b) Pontosan fordított sorrendben járunk el. 

c) A villogtatni kívánt szöveget más színnel írjuk be, mint a stabilt, majd az első 
szöveg színét villogtatjuk. 

d) Mindkét szöveget ugyanazzal a színnel írjuk be, de a FLASH 12,40 utasítással csak 
a képernyő azon felső részét villogtatjuk, ahol az első szöveg elhelyezkedik. 


9.3 Háttér- és keretszín 


Az alábbiakban néhány nem mindennapi felfedezésről számolunk be: 

A SIMON s BASIC nemcsak az eredeti kézikönyvben szereplő utasításokkal rendelkezik, 
hanem néhány olyannal is, melyeket az eredeti kézikönyv meg sem említ (lásd: függelék). 
Hét ilyen utasítást találtunk, de ezek közül csak három működőképes. A fennmaradó négy 
bizonyára nem lett kész időre (az ilyen programok előállítása sokszor határidő kérdése). 
Azt, hogy ezeket az utasításokat a meghirdetett modulváltozatban milyen mértékben 
vették figyelembe, természetesen még nem tudjuk. Az viszont biztos, hogy további három 
olyan utasítás áll rendelkezésünkre, amelyek a képernyőn való megjelenítésre vonatkoz- 
nak. 

Az utasítások leírása előtt néhány dolgot meg kell magyarázni: 


Az EXTENDED COLOLUR (kiterjesztett szín) üzemmód: 


A Commodore 64-es az ismert normál szövegüzemmód (egy háttérszín minden karakter- 
hez és 15 karakterszín) mellett rendelkezik még egy további szövegüzemmódaal is, 
melynek keretében minden karakterhez külön háttérszínt (összesen négy háttérszín 
regiszter van, tehát négy választható háttérszín áll rendelkezésre) definiálhat. Ezt az 
ábrázolásmódot "extended colour" üzemmódnak hívjuk. 

Az előbbiek értelmében minden karakterhez négy háttérszínből választhatunk, melyek 
a megfelelő utasításokkal vagy a mindenkori érték megfelelő regiszterekbe való beírásá- 
val (POKE segítségével) rögzíthetők: 


OZRATSESZÍN E ete zz éz szelén ÉSA Eye POKE 53248 1- 33, hszO 
MT NAttóKSZÉT ásatás ő a e KK e Eszes b POKE 532481 34, hsz1 
2NAHSESZÍRŰ és z zsé ee ákeáke été s e LL 2 POKE 53248 35, hsz2 
ZANA ESZÍN E E State é ee éke éa ER nt ASE POKE 53248 36,hsz3 


Látható, hogy a 0-regiszter azonos a normál háttérszín kijelölésére szolgáló regiszterrel. 
A "hsz" a mindenkori színkód, amelyet a függelékben találhatunk meg. Azt, hogy egy 
jelhez milyen háttérszín tartozik, a video-RAM byte-jainak felső két bitje határozza meg. 
A video-RAM vagy képernyőtároló, a szövegablak karaktereinek kódját tartalmazza. 
Mivel a két bit normál körülmények között szintén részt vesz a karakterek kódolásában, 
az "extended colour"-üzemmódban csak 64 karakter áll rendelkezésünkre. Ilyenkor a 
grafikus karaktereket, valamint kis-/nagybetűs üzemmódban a nagybetűket és az inverz 
karaktereket nem tudjuk használni. 

Amennyiben ezeket mégis behívjuk, akkor az engedélyezett karakterek valamelyike más 
háttérszínt kap. Azt, hogy ez melyik karaktert, és mi módon érinti, egyszerűen megtudhat- 
juk a képernyőkódok táblázatából (CBM 64 felhasználói kézikönyvből). 

Itt az alábbi hozzárendelés van érvényben: 


MSBSs . . képernyőkódok... Háttérszínek 
00 000—063 HSZO 
01 064—127 HSZ1 
10 128-191 HSZ2 
11 192-255 HSZ3 


MSBS alatt a képernyőtároló byte-jainak felső két (6. és 7.) bitjét értjük. 

A képernyőkódok mindig decimális értékek. Próbaképpen vessük össze a fenti és a 
kézikönyvben megadott képernyőkód táblázatot. 

Például ha a B betűt a 7-es (sárga) háttérszínnel akarjuk kijeleztetni, "akkor az ehhez 
tartozó háttérszín-regiszterbe (itt az 1-esbe) a 7-es értéket vigyük be, majd a POKE 
utasítással a képtároló megfelelő regiszterébe a 2-est (B-betű), és — az 1-es regiszter 
vezérléséhez — a "64" értéket. 

Az is egy lehetséges megoldás, hogy a SHIFT/B karaktert, azaz a CHR$(98)-at PRINT 
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10 BCKGNDS 2,3,4,5:REM EXTENDED COLOUR-ÜZEMMÓD BEKAPCSOLÁSA 
20 POKE 53248 -t 34,7:REM 1.HÁTTÉRSZÍN — SÁRGA 
30 POKE 1024,2--64: REM KARAKTER A BAL FELSŐ SAROKBAN 


vagy 


100 BEKGNDS 2,3,4,5:REM EXTENDED COLOUR-ÜZEMMÓD BEKAPCSOLÁSA 
110 POKE 53248 -- 34,7:REM 1. HÁTTÉRSZÍN — SÁRGA 
130 PRINT CHRS(98) :REM KARAKTER A KURZORPOZÍCIÓBAN 


A program lefuttatása után tovább kísérletezhetünk, mert az üzemmód érvényben marad. 
Ezek után térjünk rá a bizonyára türelmetlenül várt utasításokra. 

Ha az eddig leírtak nem elég világosak, az első mintaprogramot egészítsük ki a követke- 
ző utasításokkal: 


40 POKE 1027,2 
50 POKE 1030,128 4-2 
60 POKE 1033,1924-2 


Mielőtt a programot elindítjuk, töröljük a képernyőt. Ezután változtassuk a 20. sorban a 
34-es értéket 33-, 35-, 36-ra, majd módosítsuk többször a színkódot is. A látottak alapján 
érthetőbbé válik a két táblázat közötti összefüggés. (Magyar változat készítői.) 


9.3.1 COLOUR - a keret és háttér színe 


Formátum:  COLOUR ksz, hsz 
Paraméterek: ksz — keretszín (0—-15) 
hsz — háttérszín (0—15) 
Funkció: A keret- és a háttérszín meghatározása 
Példa: COLOUR 6,7 


Az előzőekben már említett három új utasítás közül az első lehetővé teszi, hogy egyszerű 
módon változtathassuk a keret és a háttér színét. Ennek megfelelően nem kell a POKE 
utasításokat használni, melyek funkcióját (feltéve ha nem fűzünk hozzá megjegyzést a 
REM utasítással) könnyen elfelejthetjük. 
Az első paraméter: ksz, a külső képkeret színét rögzíti. Értéke a keret színkódját tartal- 
mazza. 
A bevitt kódot a megfelelő regiszter automatikusan tárolja. A keretszín kiválasztására a 
BFLASH-hoz hasonlóan itt is különös figyelmet kell fordítani, mivel a túl világos színek 
elveszik a fényerőt a képmezőtől, ami a szöveg olvashatatlanságáig fokozódhat. Jól 
szemlélteti ezt a példa. A COLOUR funkciójának ez a része a következő POKE utasítás- 
nak felel meg: É 

POKE 532481 32,hsz 
A "hsz" paraméter a szöveg háttérszínét jelöli. Ez természetesen csak szövegüzemmód- 
ban érvényes. A háttérszín beállítására a grafikus üzemmódban más utasítások vonat- 
koznak [többszínű üzemmódban (lásd később) a POKE utasításon kívül ez az egyetlen 
eszköz a háttérszín megválasztására]. A keretszínt ezzel az utasítással a grafikus üzem- 
módban is tudjuk módosítani. A háttérszínek rögzítésekor lehetőleg olyan színeket vá- 
lasszunk ki, melyek a szövegszínnel jó kontrasztot adnak, mert ezzel elkerüljük a szürkés 
színhatás (pl. kék alapon vörös) kialakulását. 
Ez az utasítás POKE-kal így írható fel: 


POKE 53248 t 33, hsz 
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Összességében tehát a COLOUR az alábbi két utasítással helyettesíthető: 
POKE 53248 -- 32.ksz 
POKE 53248-4-33,hsz 

ami jól szemlélteti a COLOUR előnyét. 

Példa: 
P. 36 


1 REM aedkáköledeseaettenk kezes téesz 

2 REMKCOLOURHK 

3 REM MEEREdtaj atta e es eake3k 

109 REM 

1109 PRINT CHR$C1472:REM KEPERNYO TORLES 
120 PRINT CHR$C312) :REM SZOVEGSZINEKEK 
130 PRINT ATCO.82"":REM MEGHATAROZASA 


131 REM ES A KURZOR POZICIONALASA 
149 CENTRE "átokokáekek EK KMDKEENEKEK " : PRINT 
158 CENTRE "i0k H6k" : PRINT 


160 CENTRE "ik KERETSZIN kit": PRINT 
170 CENTRE "kik VALTOZTATASA dé" :PRINT 


189 CENTRE "ii kek" : PRINT 
199 CENTRE " Melédétedestesjetedk Kejekekaketetek" : PRINT 
209 REM 


210 FOR kSZzO TO 15 
220 COLOUR KSZ.0O:REM HATTERSZIN:5FEKETE;KERETSZIN VALTOZIK 
239 PARUSE 1 
240 NEXT KSZ 
REM 


260 PRINT ATCO, 102 "":REM KURZOR POZICIONRLASA 

270 CENTRE " HATTERSZIN ":PRINT 

289 REM 

290 FOR HSZag TO 15 

309 COLOUR 0.HSZ:REM KERETSZINSFEKETE; HARTTERSZIN VALTOZIK 
318 PRUSE 1 

9320 NEXT HSZ 


9.3.2 BCKGNDS - az EXTENDED COLOUR bekapcsolása 


Formátum:  " BCKGNDS hszO, hsz1, hsz2, hsz3 
Paraméterek: — hszO : 0. háttérszín 

— hsz1 : 1. háttérszín 

— hsz2 : 2. háttérszín 

— hsz3 : 3. háttérszín 


Funkció: Az EXTENDED COLOUR üzemmód bekapcsolása és a 4 háttérszín megha- 
tározása 
Példa: BCKGNDS 3,4,5,6 


Az utasítás tanulmányozása előtt feltétlenül el kell olvasni a 9.3 ponthoz tartozó beveze- 
tést, mivel az ott leírt ismeretekre az alábbi összefüggések megértéséhez mindenképpen 
szükségünk lesz. 

Az utasítás olyan lehetőséget kínál, melyet eddig még nem próbáltunk a számítógépünk- 
kel, nevezetesen az EXTENDED COLOUR üzemmódot. Egyébként a CBM 64 lehetőségeit 
ismerve, még egy egész halom, ez ideig programokban csak igen ritkán használt funkció 
található. A kibővített üzemmód fogalmát és tulajdonságait részletesen tárgyaltuk az 
említett bevezetésben. Ennek elolvasása után megtudhattuk, hogy ilyenkor a képernyő 
valamennyi karakteréhez egyedi háttérszín rendelhető úgy, hogy az illető háttérszín 
származási regiszterét megadjuk. Egyidejűleg 64 karakterre csökken a karakterkészlet. 
A BCKGNDS utasítással szöveges üzemmódban ez az állapot rendelkezésre áll és a 
négy regiszterhez hozzárendelhetők a kívánt színek. 

A négy szín kiválasztására a hsz0O, hsz1, hsz2, hsz3 paraméterek szolgálnak, melyekbe 
tetszés szerinti színkód írható. Ha pl. hsz0O 7-tel egyenlő, akkor a 0. háttérszín regiszter 
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sárga színt kap, ami azt jelenti, hogy a normál körülmények között bevitt karakterek is 
ezen a háttérrel fognak megjelenni. 
A leírtakat két példaprogrammal szemléltetjük: 

P. 37 

1 REM EEkEEEKKHOK FEK kk kk kak 

2 REMX$1I.BÜKGNDSxX 

3 REM deredéségetetetere te dede tk keok keaéskök 

199 REM 

119 PRINT CHR$-r(1472:REM KEPERNYO TÖRLES 

129 PRINT CHR$(53:REM SZOYESSZIN-FEHER 

134 COLOUR A.€:REM KERETSZIN-FEKETE 

1498 BCKGNDS 2,3.657:REM EXTENDED COLOUR—-UZEMMOD FEKAPCSOLASR 

159 REM ES A HATTERSZINEK MEGHRTRROZASR 

169 FOR X-9A TŰ 255 . 

179 FOKEZ$A11924.CODE:REM KRRAKTER BEIRREH 

189 POKEZEXLTS529€ , a: REM KARAKTERSZIN A SZINRAMBA (FEKETE? 

199 CODE-CODEt1:REM KÜYETKEZO KEPERNYÜKON 

2080 NEXT X 

219 PRINT AT(B, 159"":REM A "READY." ES A KURZOR POZICIONALASA 
Példaprogramunk az összes lehetséges karaktert kijelzi azzal a négy háttérszínnel, 
amelyeket előzőleg a BCKGNDS utasítással előírtunk. A 170. és 180. sorok részletes 
ismertetése az FCHR utasítás funkciójának leírásánál található. 
A 190. sorban folyamatosan növelt képernyőkódot a 170. sor elhelyezi a képtároló egyik 
regiszterében. A 180. sor láthatóvá teszi a karaktert, azzal, hogy a színt elhelyezi a 
szín-RAM megfelelő rekeszében. 
Próbáljuk ki az egyes háttérszíneket a BEKGNDS paramétereinek változtatásával. 


Figyeljük meg, hogy a P. 38-as program listája kisbetűvel készült. 


Ennek oka a következő: 

A Commodore 64 alternatív karakterkészletét használtuk, vagyis ami egyébként nagybe- 

tűvel íródik ki, az most kisbetűs, továbbá minden SHIFT-elt grafikus karakterből nagybetű 

lesz. Azért kellett ezt a kiviteli módszert választanunk, mert a háttérszínek lehívásakor 
ezekre a SHIFT-elt karakterekre szükségünk van. Amennyiben a programlemez nem áll 
rendelkezésre és a programot be kell billentyűznünk, előtte át kell állítanunk a készüléket 
nagy-/kisbetűs üzemmódra. Ezt a SHIFT/C—-billentyűk együttes lenyomásával tehetjük. 

Ha kísérletünk hatástalan, írjuk be a PRINT CHR$(9) parancsot és próbáljuk meg újra az 

átkapcsolást. Az EXTENDED COLOUR üzemmódban minden másképpen néz ki. 

Még valami a magyarázathoz. Minden normál karakter (a nem SHIFT-elt kisbetűk 

(CHR$(32)-től CHR$(95)-ig) a megszokott módon a 0. háttérszínnel jelenik meg. 

Ezzel szemben a SHIFT- vagy a C—-billentyűvel kijelzett karakterek (CHR$(96)-tól 

CHRS(191)-ig, kivéve a CHR$(125) és CHR$(159) közöttieket) az 1. háttérszínt kapják. 

Az alábbi leírás alapján megtudhatjuk, hogy az egyes billentyűk melyik karakternek 

felelnek meg: 

1) Keressük ki a képernyőkódok táblázatából (lásd: kézikönyv) a szükséges karaktert. 
A karakter kódja azonban nem lehet 63-nál nagyobb, mert nem lehet kijelezni. 

2) A leolvasott kódértékhez adjunk 64-et, és ugyanebben a táblázatban nézzük meg, 
hogy az új kódhoz melyik karakter tartozik. 

3) Ezek után a kézikönyv ASCII-táblázatából keressük ki a karakterhez tartozó ASCII- 
értéket, melyet most a kívánt karakter 1. (vagy 3.) háttérszínen történő megjelenítésé- 
hez meg kell adnunk. k 

A fenti komplikált műveletsor nélkül is előállíthatjuk a megfelelő háttéren a kívánt betűt, 

ha egyidejűleg a SHIFT-billentyűt is lenyomjuk. 

Számok és írásjelek esetében viszont kizárólag a bonyolultabb mód alkalmazható (lásd 

a 2. példa P. 38-as program 470. sorát). 

Ha a 2. háttérszínre kívánunk írni, akkor ugyanúgy kell aljárni, mint a 0. szín esetében, 

azzal a különbséggel, hogy inverz-üzemmódban (az RVS/ON lenyomása után) ket! a 
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. 38 
rem késdsátésásáá átáll ő 


P 
1 
2 8 g 

50. rer HEGEL EE 
156 rem 

169 Frintchr$(147-/öreöm keFernuc torles 
179 Printchr$(52:rem szovezzfeher 

194 colour A 8:rem keret-fekete 

199 Eckgni3z 2.53.6.ú rem extended cola 
200 rem es a hatterszínek meghatarozsa 
218 rem normal karakterek kovetkeznek 

229 centre "lathatjuk, hogy az ":Print 

230 centre "extended zolour—-uzemmodban" : Print 

z4A centre "zzabalyozan lehet irmi!":Print 

250 Pauze 3 

260 rem 

27 rem a küvetkezeo karakterek shift-eltekidzshiftő 
2398 Printchr$(147 

298 Print 

308 centre "A HATTERSZINEK" : Print. 

318 centre "SZELES": Print 

328 centre "SKALAJR": Print 

3253 centre "RLL RENDELKEZESÜNKRE." :Print 

330 Pauze 9 

349 rem 

358 Printchr$(147 

360 Print 

370 reszchr$( 192 rem rusron a hatterszinre 

380 rem a kovetkeze karakterek inyerzen, ishift2 nelkul jelemmek meg 
399 centre rvst"minden karakterhez" :Print 

408 centre rvést"4 szinbol valasztott" :Prirt 

418 centre rug$t"hatteret. rendelhetunk ., ": Print 

420 Pause 3 

430 rem 

440 Printckr$(147, 

458 Print 

460 rem a kovetkeza karakterek inverzben es zshift-tel jelennek meg 
478 köszehrő(17z22:rem veszzoakcdtéd hf3-raa fedd karaktert adja 

439 zertre ry$t"ARRA ÜGYELJUNK. ":Print 

498 centre ru$t"HOGY GRRAFIKLIS karakterek": Print. 

59 centre ry$t"A. KIVITELBEH NEH LEHETNEK !":print 

5913 Pause 9 

329 rem 

599 Printchr$(1477 

548 Print 

999 centre "termeszetesen megProbalhatunk"truft" MIMNDEn" : Print 

368 Print 

579 ro$gzchr$(146) rem rvszoff 

598 ház "hR" try ET" trogt"eR" 

599 h$-hátrrust"szörrosriN" trust öt" rem szoosszetetel 

608 Print at(15.45h$ 

610 Print 

620 centre "egyidoben "irv$4r"ABRRAZOLNI., ":Print. 

639 Pause 15 

640 rem 

650 Printchr$(147? 

6609 Print 

679 centre "nezzuk meg megegyszer" :Print 

680 centre "a most kovetkezo Programlistat":Print 

699 centre "ebben az uzemmodban; mi a. magyarazat?" :Print 

700 Pause 9 

719 rem 

728 list 


reszermmod bekaPcsalasza 


53. 
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karaktereket bevinni. A 3. háttérszín az 1. színhez alkalmazott karakterek inverz bevitelé- 
vel állítható elő. Az alábbi módon történik pl. a "97-es számjegy és a "c" betű megjeleníi- 
tése a négy háttérszínen. 


0. háttérszín PRINT "97 
PRINT 7e" 
1. háttérszín PRINT CHR$(185) 
PRINT 7C" 
2. háttérszín PRINT CHR$(18)"97 
. PRINT CHR$(18)7e" 
3. háttérszín PRINT CHR$(18) CHR$(185) 
PRINT CHR$(18)7C" 


Ha ezek után sem teljesen világos még a karakterek ábrázolásának ez a módja, nem kell 
elkeseredni. Haladjunk tovább és a későbbiekben (pl. a grafikus gyakorlatokat követően 
vagy a másodszori olvasás alkalmával), a számítógép alaposabb ismeretével mégegy- 
szer visszatérhetünk ehhez a részhez. 

Egyet nem szabad elfelejteni, miszerint próba és állandó gyakorlás nélkül nem megy. 
Minden egyes leírt példán át kell, hogy rágjuk magunkat, mivel az azt követő magyaráza- 
tok erre épülnek. j 


9.3.3 NRM - az EXTENDED COLOUR kikapcsolása 


Formátum:  NRM 


Paraméterek: — 
Funkció: Az EXTENDED COLOUR üzemmód kikapcsolása 
Példa: NRM 


Az EXTENDED COLOUR üzemmód eddig ismertetett utasítás készletéből már csak egyet- 
len utasítás hiányzik, mégpedig az üzemmód kikapcsolása. 

Ezt a feladatot az eddig ismeretlen NRM utasítás végzi, melynek egyetlen funkciója az 
üzemmód kikapcsolása, az egyeduralkodóvá váló 0. háttárszín meghagyásával. (Ennek 
módosításához egy COLOUR utasítás szükséges). 

A későbbiek során néhányszor még fogunk találkozni az NRM-mel és megismerhetjük 
további funkcióit, melyekről itt csak röviden szólunk. 


1) A grafikus üzemmód kikapcsolása. 
2) A MEM üzemmód kikapcsolása (visszaállás a régi karakterkészletre). 
3) A nagybetű-—/grafikus jelkészlet üzemmód bekapcsolása. 


Példa: 
Az NRM utasítást írjuk be a P.38-as 2.BCKGNDS című program végére. 
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9.3.4 Ellenőrző kérdések 


1. Melyik utasítás alkalmas arra, hogy a háttérszínt fehérre, a keretszínt pedig sárgára 
változtassa? 


a) COLOUR 17 

b) COLOUR 7,1 

c) BECKGNOS 1,7 - 

d) POKE 53248 --33,1:POKE 53248 4 32,7 


2. Az ,A"-karaktert a 2. háttérszínnel kívánjuk megjeleníteni. Hogyan csináljuk? 
a) PRINT CHR$(65) 
b) PRINT CHR$(97) 
c) PRINT CHR$(18) CHR$(65) 
d) PRINT CHR$(18) CHR$(97) 


A mostani (egyáltalán nem könnyű) feladatok megoldásai az eddigiekhez hasonlóan a 
függelékben találhatók. 
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9.4 Képernyőtartományok vezérlése 


Ez a fejezet a nagyobb képernyőtartományokkal végezhető műveletekkel foglalkozik. Az 
ismertetésre kerülő utasításokkal gyorsan és hatékonyan kezelhetjük a képernyőt. 

Az alábbiak megértéséhez bizonyos alapismeretekkel kell rendelkezni a számítógép 
képalkotásáról. Elevenítsük fel eddigi ismereteinket a képernyő-ablak hardver-jét ille- 
tően. 

A számítógép az ún. képtárolóban tárolja azokat az információkat, amelyek segítségével 
minden 1/20 másodpercben új képet állít elő. A képtároló 1K nagyságú, ami kb. 1000 byte 
vagyis 1000 karakter. A memóriában a $400 (decimálisan: 1024) és a $7E7 (decimálisan: 
2023) címek között helyezkedik el. 

A képernyőn megjelenő minden egyes karakternek külön kódja van, ugyanúgy mint az 
ASCII kódoknál. A képernyőkód és az ASCII kód sajnos nem egyezik meg. 

A képernyőkódoknál szintén megkülönböztetjük a normál és inverz karaktereket, hiszen 
ha nem így lenne, a gép nem tudná külön megjeleníteni őket. 

A képernyőkodok részletesen a felhasználói kézikönyvben találhatók. Az inverz karakte- 
rek kódjának kiszámítása a következő: 


inverz kód — normál kód.-- 128 
Példa: 


10 PRINT CHR$ (147) CHR$(158): REM KÉPERNYŐ TÖRLÉS, SZIN- SÁRGA 

20 FOR X—1TO 100 

30 PRINT " " ; 

40 NEXT X 

50 FOR X— 1024 TO 1124 

60 POKE X,1 : REM AZ "A"-BETÜ KÓDJÁNAK BEVITELE A KÉPERNYŐTÁROLÓBA 
70 NEXT X 


Példaprogramunk a képernyő bal felső sarkától kezdve folyamatosan beír 100 , A" betűt. 
A 10.—40. sorokban a karakterek háttérszínét határoztuk meg, majd erre az előkészített 
100 helyre beírtuk az , A"-betüket. Az , A" képernyőkódja 1. Ezzel áthidaltunk egy problé- 
mát, amelyre a következő bekezdésben térünk ki. 

A képi megjelenítéshez a karakterek színét is meg kell határozni, hiszen elméletileg 
minden karakter más és más színben jelenhet meg. A színek tárolására egy újabb tároló 
szolgál, amelyet szín-RAM-nak nevezünk. Hossza megegyezik a képtároló hosszával és 
a $D800-$DFFF (decimálisan 55296-56295) címek között helyezkedik el. A szín-RAM is 
POKE utasításokkal érhető el, és minden egyes byte-ja a képtárolóban a hozzá tartozó 
karakter színét rögzíti. 

A szövegmezőhöz tartozó háttér színét viszont a VIDEOCHIP egyetlen regisztere tárolja. 
A VIDEOCHIP vagy rövidebben VIC a számítógép képelőállításáért felelős áramköre. Az 
említett regiszter az 53248 -t 33 memóriacímen van, és pl. a 


POKE 53248 1 33,0 : REM HATTER — FEKETE 


utasítással érhető el. A témáról részletesebb információkat a grafikánál közlünk. 

Az alábbi jelenségre azonban még fel kell hívi a figyelmet: 

Ha egy programban töröljük a képernyőt, a képtárolón kívül a szín-RAM is törlődik. 
A szín-RAM minden byte-ja a háttérszín kódját veszi fel. Ezért bevitelkor nem látunk 
semmit mert a karakterek a háttérszínt veszik fel. A karakterek egyébként léteznek. Erről 
úgy győződhetünk meg, hogy a kurzort végigvezetjük a képernyőn, vagy egyszerűen 
megváltoztatjuk a háttérszínt. Ha a karaktert a kívánt színben akarjuk megjeleníteni, a 
színkódokat be kell vinni a szín-RAM megfelelő címére. 
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Példa: 


10 PRINT CHR$(147) : REM KÉPERNYŐ TÖRLÉS 

20 POKE 1024,2 : REM "B"—BETŰ A KÉPERNYŐTÁROLÓBA 
30 STOP: REM ELHAGYHATÓ 

40 POKE 55296,0 : REM KARAKTER — FEKETE 


Először futtassuk a programot a 30. sorral együtt, majd a program befejezésekor vigyük 
a kurzort a bal felső sarokban, ahol a ,B" betűt találjuk. Most töröljük ki a 30. sort és 
indítsuk újra a programot. Ezután már értéket kap a szín-RAM megfeleő byte-ja, és 
megjelenik a fekete ,B" betű. 

Így már megfelelő alapismeretekkel rendelkezünk a következő utasítások megértéséhez. 


9.4.1 FCHR - feltöltés azonos karakterekkel 


Formátum: FCHR s, o, sz, m, k 
Paraméterek: s — a képmező bal felső sarkának sora (0—24), és 

o — oszlopa (0-39) 

sz — a mező szélessége, és 

m -— magassága 

k — az aktíválandó képernyőkód (0—255) 
Funkció: Egy képernyőtartomány ugyanazon karakterekkel való feltöltése 
Példa: FCHR 3,5,7,9,1 
Az FCHR-utasítás segítségével a képernyő meghatározott tartománya egy k-képernyőkó- 
dú karakterrel tölthető meg. Az utasítás a FILL CHARACTERS kifejezés rövidítése. 
A tartomány csak téglalap alakú lehet. Az utasítás első két paramétere a téglalap 
helyzetét, míg 3. és 4. paramétere a nagyságát adja meg. 
A téglalap helyzetét bal felső sarkának koordinátáíval difiniáljuk, ahol s a sort, o pedig 
az oszlopot jelenti. A m- és sz-paraméterek a téglalap magasságát és szálességét 
határozzák meg. Értékeik karakter egységekben értendők és a téglalap helyzetét adó s 
és o koordinátáktól számítjuk. Ebből következik, hogy nem lehetnek nagyobbak, mint a 
kezdőpont és a képernyő széle közötti különbség. Ha tehát a téglalap bal felső sarka a 
10. sorban és 10. oszlopon helyezkedik el, akkor m értéke max. 14 lehet, mivel a képernyő 
aljáig ennyi sor van még. Az sz értéke viszont legfeljebb 29 lehet, mert a képernyő jobb 
széle ilyen távol van a kezdőponttól. Ha a megengedettnél nagyobb értékeket adunk meg, 
akkor a téglalap "kilóg" a képernyőből. § 
Ha valamelyik paraméternek 0 értéket adunk, akkor a , BAD MODE" hibajelzést kapjuk, 
amivel a későbbiek során foglalkozunk. 
Az FHCR utasítás a következő BASIC sorokkal helyettesíthető: 


170 FORY-S TOM : REM SOR-CIKLUS 

180 FOR X-O TO SZ : REM OSZLOP-CIKLUS 

190 POKE 1024--40£X,K : REM KARAKTEREK BEÍRÁSA 

210 NEXT X,Y : KÖVETKEZŐ OSZLOP/SOR 
A program SSMM,O,SZ,K paraméterei megegyeznek az FHCR utasításnál leírtakkal (sor, 
magasság, oszlop, szélesség, képernyőkód). 
A 190. sor az aktuális pozícióból számítja ki a szükséges címet, a soronkénti lehetséges 
40 karaktert feltételezve, majd a kapott eredményhez hozzáadja a tört sor karakterszá- 
mát és megkapja a karakter címét. A cím számításához mindig ezt a képletet használjuk, 
ha a képtárolóval dolgozunk. 


cim — 1024 -t 40: sor 1 oszlop 


ahol: 1024 a képtároló kezdőcíme. 
A műveleti sebességek összehasonlítására lássunk egy példát: 


95 


P. 39 


1 REM BEER NENEMENEM E ÉÉTENE BAK 

2 REMWIFCHR AN 

3 REM AtAtktMededtesktakakokokokak 

109 REM 

110 REM MINTAPELDA "FCHR7 NELKUL 

129 REM 

139 PRINT"T" 

149 Sm1:Ma23:Oz2:SZs35:Km1 :REM PARAMETEREK MEGADASA 
1509 FOR YaS TO M:REM SOR-CIKLUS 

1609 FOR Xs0O TO SZ:REM OSZLOP-CIKLUS 

170 POKE 1924t4t404Y-4X,K:REM KARAKTEREK BEIRASA 
189 REM POKE 55296440$Yt6tX,4:REM SZIN BEIRASA 
198 NEXT X.Y:REM KÖVETKEZO SOR/OSZLOP 


Ha a programunkat lefuttatjuk, láthatjuk, hogy nem sokat csinál. 

Ezt a karakter- és színtároló szétválasztása okozza, amelyről a bevezetőben már beszél- 
tünk. Ezért a 180. sorba a REM után tettünk egy kiegészítést. Ez eddig hatástalan volt, 
így a karakterek nem színeződtek el. Ha most kitöröljük az első REM utasítást és újra 
indítjuk a programot, már többet láthatunk. Még érdekesebb, ha a színkódot X-szel vagy 
Y-nal helyettesítjük. A most aktivizált szín-RAM beállító utasítás már az FCOL-utasítás 
előzetese. A program pedig a két utasítás kombinációja, amelyek egyébként is szoros 
kapcsolatban állnak egymással. A 180. sorban egy olyan képletet használunk, amellyel 
kiszámíthatjuk a szín-RAM címeit és ami szükségszerűen hasonlít a képtárolónál megis- 
mert képlethez. Az egyetlen különbséget a kezdő cím jelenti, ami a szín-RAM esetében 
55296. 

Példánk 140. sorában csak egy lehetséges paramétersort állítunk be. Természetesen 
ezeket meg lehet változtatni és a programot újra futtatni. A karakterek képernyőkódját 
mint már említettük, a CBM64 felhasználói kézikönyv tartalmazza. 

Most nézzünk egy példát az FCHR utasítás alkalmazására. 


P. 40 


199 REM seleésedkakedege ek ezek 

1289 REMK2.FCUCHR E 

149 REM $i4kkkkeketekek kk 

158 REM 

1€9 PÜOKE 53248433,ü:REM HATTER-FEKETE 

170 PRINT CHR$(1477 

188 CENTRE ":3105T A KEPERNYÜ URES" 

199 PAUSE 3 

290 FCHR 3.8.49,22,1:REM (A: KARAKTER IRASA SZIN NELKUL. 
218 REM 50R-3.0SZLOÖP-B. SZELESSEG-48., MAGASSAG-22 , KARAKTER— "A" 
228 PRINT AT(B,02"";:REM KURZOR POZICIONALASA 

230 CENTRE "3 A 3-24 SOROK SZIN NELKULI" :PRINT 

240 CENTRE "KRRAKTEREKKEL TELNEK HEG.":PRINT 

280 CENTRE "SEMMI NEM LATHATO." 


270 FPRUSE 6 

299 PRINT ATÁRA" "; 

2990 CENTRE " MOST HEGYALTOZTATJUK A ":PRINT 
399 CENTRE " HATTERSZINT ES MINDEN ":PRINT 
328 CENTRE " LATHATOVA VALIK ! v. 


334 PRAUSE 3 

348 POKE 532483-433,14:REM HATTER-YILAGOSKEK 

3508 PALSE € 

268 PÜOKE 53243433.0:REM HATTER ISMET FEKETE 

370 PRINT ATÁfA. 829"; 

388 CENTRE "3 HR A KURZORT LEFELE ES ":FPRINT 
398 CENTRE " JOBBRA MOZGATJRA ":PRINT 

410 CENTRE "LATNI FOGJA; MIROL VAN SZO!" 


Reméljük, programunkhoz nem kell külön magyarázat. 
96 : 


9.4.2 FCOL - feltöltés színnel 
Formátum:  FCOL s,o,sz,m,ksz 
Paraméterek: s -— a képmező bal felső sarkának sora (0—24), és 
o — oszlopa (0—-39) 
sz — a mező szélessége és 
m — magassága 
ksz — karakterszín (0—15) 
Funkció: Egy képernyőtartomány megtöltése egy színnel 
Példa: FCOL 5,4,5,3,8 
A fejezet további tanulmányozása előtt föltétlenül el kell olvasni a 9.4 pont bevezetőjét, 
valamint az FCHR utasításnál leírtakat. Az FCHR- és FCOL-utasítások szorosan kapcso- 
lódnak egymáshoz. 
Az FCOL utasítás első négy paramétere megegyezik az FCHR-nál leírtakkal. Meg kell 
adnunk a kívánt színnel megtöltendő képtartomány helyzetét és nagyságát. Az így kijelölt 
tartományban a szín-RAM a ksz színt (0—-15) veszi fel és a karakterek kizárólag a ksz által 
megadott színben jelenhetnek meg. 
Ha a tartományba új szöveget akarunk írni, akkor a szín-RAM karakterszínét PRINT 
utasítással meg kell változtatni. A szövegnek tehát új színt kell kapnia. 
Ha az eredeti szöveget (karaktereket) is a régi színben szeretnénk átvinni a szín-RAM- 
ból, akkor a képtárolóhoz közvetlenül a POKE vagy az FCHR utasításokkal kell hozzáfér- 
nünk. 
A fent leírtakból következik, hogy az FCOL utasítás hatásai kizárólag csak akkor érvénye- 
sülnek, ha a tartományban szöveg (karakter) van. 
(Hasonló módon, mint az FCHR esetén, ami csak akkor működik, ha a színt a szín-RAM- 
ban valamilyen módon beállítjuk). 
Az FCOL utasítás - az FCHR-hez hasonlóan - helyettesíthető egy kis BASIC rutinnal, mely 
a következőképpen néz ki: 
160 FOR Y-—S TO H:REM SOR-CIKLUS 
170 FOR X-—O TO B:REM OSZLOP-CIKLUS 
190 POKE 55296 -- 40xY -- X,KSZ : REM SZÍN BEÁLLÍTÁSA 
200 NEXT X,Y : REM KÖVETKEZŐ SOR/OSZLOP 


Ne feledkezzünk meg valamilyen szöveg megjelenítéséről, különben nem láthatunk 
semmit a képernyőn. 
Példa: 
Az alábbi példaprogram megismerteti velünk az FCOL utasítás működését: 
P. 41 
1 REM HEKKEKEKKEKEKK 


2 REMXKIFCOÜOL BEK egés 


3 REM détegegek kette kk 
150 REM 
169 POKE53248-433,4:REM HATTER-LILA 
178 PRINT CHR$(f147? 
189 PRINT CHR$(C5J:REMH FA. KARAKTER-FEHER 
198 CEMTRE "MDST A KEFERNYO LILR":PRINT 
299 PAUSE 3 
218 PRINT ATÁRA" " ; 
220 CENTRE "AZ 1-24 SOROK ":FRINT 
23a CENTRE "MEGTELNEK KEK SZINNEL," :PRIMT 
246 CENTRE "DE CSAK FA LETEZŐ KARAKTEREK" :PRINT 
269 CENTRE "FOGNAK MEGYALTOZHI,":FRINT 
278 PAUSE 9 
299 PRINT CHR$(1595:REM KRRAKTERSZIN TNMRKIZ 
298 CENTRE "FIGYELEM! ":PRINT:PRINT 
PALSE 1 
329 FCOL 1.D.48.24,6€:REM (KEK; SZIN BEIRASA KRRAKTER NELKÜL 
339 REM SOR-G, ÜSZLOP-—K . SZELESSEG-48 , MAGASSAG-Z4 
349 PRINT CHR£K52;:REM KARAKTER-FEHER 
3259 CENTRE "AMIT MOST IRUNK.":PRINT 
363 CENTRE "EREDETI SZINBEM JELENIK MEG" 


Ezután pedig bemutatjuk a két utasítás (FCHR, FCOL) együttes alkalmazását: 


P. 42 


1 REM AANKOKNKSEKA KR AE ZENE KED OK 

z REMKZ2ZFCOLM 

3 REM MEMNMEKESEKE ZEKE EHE VK 

109 REM 

119 POKES32491433., 0 :REM HATTERSFEKETE 

íZ29 PRINT CHRS$C147):REM KEPERNYO TÖRLES 

139 FOR Xs 0 TO 33 STEF 5 

140 YzyY32 :REM SORSZAMLRALO 

150 FCHR V.X.53.3.4:REM AZ Y KEPERNYOKODU KARAKTEREK BLOKKJANAK FELTOLTESE 
179 FCOL 9.X4.5.5.Y/2:REM RZ Y/2 SZINKODU BLOKK FELTOLTESE 
199 NEXT X 

299 PRUSE 6 

210 PRINT CHR$(C147) 

220 YzO:REM KEZDO SZINa FEKETE 

230 FCHR 9.8. 40.25. 128432 

240 FCOL 0, 9. 49.23,6 

250 REM A KEFERNYO MEGTOLTESE INYERZ KEK SZOKOZOKKEL 
260 FOR Xr4 TO 34 STEP 2 

270 FCOLS.X.2.15/,9:REM EGY 9AY SZINEZESE 

2980 VaYy4i:REM A KÖVETKEZO SZIN 

299 NEXT X 


9.4.3 FILL — feltöltés színes karakterekkel 


Formátum: FILL s,o,sz,m,k,ksz 

Paraméterek:s  — aa mező felső sarkának sor- (0-2) és 
o  — oszlop- (0—39) pozíciója 
sz - a mező szélessége és 
m —- magassága 
k  — az aktiválandó karakterkód (0-—255) 
ksz — az aktiválandó karakterszín (0—15) 


Funkció: A képernyő meghatározott részét azonos színű, egyforma karakterrel tölti 
fel 
Példa: FIEL35557.95251 


A továbblépéshez tanulmányozzuk át a 9.4 fejezet eddigi alpontjait. Látjuk, hogy ha a 
képernyő meghatározott tartományát színes karakterekkel akarjuk megtölteni, két utasí- 


tásra van szükségünk. 
A FILL utasítással azonban ezeket megtakaríthatjuk, sőt kiküszöbölhetjük vele az előző 


két utasításnál előforduló problémákat is. 
Tulajdonképpen a FILL utasítás az FCHR és az FCOL utasításokat helyettesíti ugyanazon 
paraméterekkel. Az egyes paraméterek jelentését már előzőleg ismertettük. 
Tehát a 
100 FCHR s,o,sz,m.k : FCOL s,o,sz,m,ksz 
utasításpár helyett egyszerűbben ezt is írhatjuk: 


100 FILL s,o,sz,m,k,ksz 
A két sor funkciója egy és ugyanaz, ezért az előbbi két utasításra elmondottak továbbra 
is érvényesek. 


Példák: 
A P.42-es, 2. FCOL című példaprogram 230. és 240. sorait helyettesítsük az alábbi 


sorokkal: 
285 FILL 0,0,40,25,128-t 32,6 
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továbbá a 150., valamint a 170. sorokat a következőkkel: 
ZOOO EME EX EBSO GY 2 


Láthatjuk, hogy a program ugyanúgy működik. 
Próbálja ki a következő programot: 


Pp. 43 


1 REM Hxrremetegetetek 

2 merté FEB Ek 

3 REM EREEKKKEKKKE 

139 REM 

140 PRINT CHR$(147)? 

150 PÜKE 53249433.6:REM HATTER-KEK 

160 FÜKE 532489432.ü:REM KERET 5FEKETE 
178 FOR 4-1 TO 189 

1508 FILL 9.18.29.25.1159.7:REM CHR$(1983? 
198 FILL £.18.29.25,. 69.7:REM CHR$(19a) 
290 FILL 8.18.28.25. 64.7:REM CHR$(962 
219 FILL 8. 190.29.25, 78.7:REM CHR$f(1822 
220 FILL £.18.29.25,111.3:REM CHR$(1757 
238 NEAT X 


Ugye látványos? 


Magyarázat: A 180-200 sorok minden pozíciójában egymás után jelennek meg a karakte- 
rek. Egy-egy karakter egymás után többször, egyre lejjebb villan fel. Ezáltal érjük el ezt 
az érdekes, lefutó hatást. 


9.4.4 MOVE - képernyőtartomány másolása 
Formátum: — MOVE s,o,sz,m,us,uo 
Paraméterek:s — a mező első karakterének sor- (0—24) és 

o — oszlop- (0-39) koordinátája 

sz —- a mező szélessége 

m - a mező magassága 

us — az új pozíció sora (0—24) és 

uo — oszlopa 
Funkció: egy képernyőtartomány átmásolása 
Példa: MOVE 4,5,2,3,10,11 
A MOVE utasítás elméletileg óriási lehetőségeket rejt magában. Használatával a képer- 
nyő kijelölt része átmásolható, vagyis elcsúsztatva megduplázható. Tehát egy megterve- 
zett képernyőtartományt egyszerűen átvihetünk a képernyő másik részére. 
Az első négy paraméter jelentését már ismertettük az előzö utasításokban, ezért ezekre 
most nem térünk ki. Egyébként a tartomány most is egy tetszőleges téglalap. Az új us 
és uo paraméterekkel a másolat bal felső sarkának koordinátáit adjuk meg. 
Ha a másolat nem fér el a kijelölt helyen, a program BAD MODE hibaüzenettel leáll. 
Itt sajnos rábukkantunk egy kellemetlen hibára: a SIMON" s BASIC lemez- és kazettaválto- 
zata (V2-ig) egy kicsi, de bosszantó hibát rejt magában. 


A fenti utasítás mindaddig korlátlanul használható, amíg us-t vagy uo-t meg nem próbál- 
juk változóként vagy matematikai kifejezésként megadni. Ekkor kilép a hibátlan működési 
folyamatból és értelmetlen eredményt kapunk (pl.: csak véletlenszerűen választott része- 
ket, vagy egyáltalán semmit sem másol). Emiatt csak konkrét számokat adhatunk meg. 
Ez a hiba persze meglehetősen bosszantó, de ilyen összetett programoknál szinte 
elkerülhetetlen. Mindettől függetlenül ez az utasítás jelentős segítséget nyújt a képszer- 
kesztésben. 

Végül a szokásos példa, amely a MOVE utasítás működését mutatja be: 
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P. 44 


1 REM KEGEKREREEKTK 
2 REMXEMOÜVER 
3 REM Eitkkkkkktékk 


198 REM 

149 PRINT CHR$(14727 

145 PRINT " semen 
158 PRINT " IEZT A KEPERNYC- 1" 
160 FRINT "1 6 TARTOHANYT jr 
179 PRINT "1 FOGJUK hd 
188 PRINT "1! ATMASOLNI., iba 
185 PRINT "5 ő kézi 


1998 FAUSE 4 

299 MOVE 1.§.18.6.1.26 

218 PHUZE 1 

229 MOVE 1.A.18.€./7.14 

238 PALISE 1 

249 MOVE 1.6.18.6.12.8 

259 FRUSE 1 

26a MOVE 1.98.18.6.13.22 
279 PHUSE 1 

298 MOVE 1.8.18.6.13.14 
299 PALSE 1 

309 MOVE 1.0.18.6./17.A 

314 PRUSE 1 

329 MÜVE 1.A8.18.6.17.20 
33a PAUSE 1 


9.4.5 INV - képernyőtartomány invertálása 


Formátum: INV s,o,sz.m 
Paraméterek: s — sor (0—24) 

o — oszlop (0-39) 

sz — a mező szélessége és 

m - magassága 
Funkció: egy képernyőtartomány invertálása 
Példa: INV 5,6,3,4 
Ezzel az utasítással újabb komoly képvezérlő eszközhöz jutottunk, mely lehetővé teszi 
teljes képtartományok invertálását. 
Az utasítás paraméterei az eddigiekből már megszokottak (lásd FCHR, FCOL, FILL és 
MOVE) és szintén a kezelendő tartományt jelölik ki. 
Az INV-utasítás működése egyszerű. A FLASH utasításhoz hasonlóan -— ami az azonos 
színben jelzett karaktereket meghatározott sebességgel villogtatja a normál és inverz 
állapot között -, inverzre váltja az előzetesen normál üzemmódban (RVS/OFF) megjele- 
nített karaktereket, úgy, mintha a PRINT utasítással aktivizáltuk volna az RVS/ON üzem- 
módot. Természetesen fordítva is igaz: az inverz karaktereket normál állapotba hozza. 
A két utasítás között két lényeges különbség van. Egyrészt az INV-utasítás egyetlen 
váltást végez, míg a FLASH mindaddig működik, míg ki nem kapcsolják. Másrészt az INV 
utasítással kiválaszthatunk egy képtartományt, míg a FLASH az egész képernyőre és 
csak egy színre vonatkozik. Az INV utasításból természetesen FLASH-t is gyárthatunk egy 
meghatározott képtartományra vonatkozóan. 
Végül még egy sajnálatos apróság: a SIMON s BASIC újabb hiányossága folytán előfor- 
dulhat, hogy ha 2 db, ugyanarra a képtartományra beadott INV utasítás között módosítjuk 
a háttérszínét, akkor a tartomány valamelyik részén felbukkan a régi háttérszín. 
A hiba megszüntetésének módját sajnos nem ismerjük. Ettől függetlenül természetesen 
szabadon élhetünk minden felhasználási lehetőséggel. 
Néhány ilyet mutatunk be az alábbi példákban: 
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1. példa: 
Egészítsük ki a 9.4.4 alpont MOVE példáját az alábbiakkal: 


360INV 1, 0,11,4 
370INV 1, 28, 11, 4 
380 INV 17, 0, 11, 4 
390 INV 17, 28, 11, 4 
400 PAUSE 1 

410 GOTO 360 


2. példa: 


. 45 


P 

1 REM kttttkkEk 

2 REMYINYEA 

3 REM $t4kEktkr 

198 FRINT CHR$(147) 

148 FÜKE 532428433.12:REM HATTER-SZLIRKE 

158 FILL 2.198.10.18.127, 7:REM -CHR$(f(191? 
160 FILL 14.18.18.19.102.14:REM -CHR$(1686. 
178 FILL 2.25.18.19.185.13:REM -CHR$(165: 
199 FILL 14.25.18.18. 97. 2:REM -CHR$(161. 
199 INY 2.18. 18.22:REM ELSO KETTÜ 

e08 INY 2.25, 19, 22:REM MASODIK KETTŐ 

218 FÜR Szi TŰ SA:MNEXT $:REH RÜYID KESLELTETES 
228 GÜTÜ 198:REM VILLOGAS 


A P. 45-ös program 210. sora egy késleltető ciklust tartalmaz. Természetesen ezt PAUSE 
utasítással is helyettesíthettük volna, de ezt inkább a hosszabb ciklusoknál használjuk, 
mivel nem teszi lehetővé 1 másodpercnél rövidebb várakozási idő kiválasztását. Mind- 
ezek ellenére kicserélhetjük, vagy a hosszát módosíthatjuk. 

Befejezéshez nyomjuk le a RUN/STOP billentyűt és máris folytathatjuk a munkát. 
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9.4.6 Eilenőrző kérdések 
A fejezet végén ismét itt van néhány feladat, mellyel ellenőrizhetjük tudásunkat. 


1. A képernyő 5. és 10. sora, ill. 4. és 9. oszlopa által határolt tartományt át akarjuk 


a) MOVE 5,10,4,9,8,11 
b) MOVE 5,4,10,9,8,11 
c) MOVE 5,4,6,6,8,11 
d) MOVE 4,5,6,6,11,8 


2. Hogyan tölthetnénk meg a képernyő egy tartományát piros "A" karakterekkel? 
aj EGHRES:SZTO 1051 
b) FHILL5.5 101012 


c) FCHR 5,5,10,10,1:FCOL 5,5,10,10,2 
d) EIEIK: 55, 1051056552 


3. Mi történik az INV 0,0,0,0 utasítás hatására? 
a) A gép nem veszi figyelembe az utasítást. 
b) Invertálódik a bal felső sarokban lévő karakter. 
c) "BAD MODE" hibaüzenet jelenik meg. 
d) "ILLEGAL OUANTITY ERROR" hibaüzenet jelenik meg. 


A helyes tippelés után folytathatjuk a munkát. (A teszt ezúttal sem volt könnyű!) 
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9.5 A képernyő gördítése 


A következőkben további nyolc nagyon szép és hasznos utasítással ismerkedhetünk 
meg, melyek a képernyő gördítésével (scrolling) foglalkoznak. 

Megígérjük, hogy örömét fogja lelni bennük. Az utasítások által létrehozott hatások 
ugyanis olyan szépek, hogy akár napokig elgyönyörködhetünk bennük (ez a személyes 
véleményünk). 

Egy kis előzetes az utasítások rendszeréhez: 

A nyolc utasítás részben ugyan hasonlít egymásra. Ezért alkalmaztuk a szekunder 
utasítások elvét. Az elv lényege, hogy összesen négy alaputasítás van (LEFT, RIGHT, UP, 
DOWN), melyek a gördítés irányát rögzítik. (Jelentésük: balra, jobbra, fel, le). Ezen primer 
utasításokhoz szekunder utasításként egy betűt kapcsolunk, ami a gördítés típusát hatá- 
rozza meg. A lehetséges szekunder utasítások a következők: 


— W — ciklikus képernyő — gördítés 
— B — gördítés képátfutás nélkül 


Egy utasítás a következőképpen néz ki: 


LEFTW 0,0,10,10 


A primer (pl.: LEFT) és a szekunder utasítás (ebben az esetben W) közé nem kerülhet 
szóköz. 

A ciklikus gördítésen azt értjük, hogy a megadott tartományból kilépett részek nem 
vesznek el, hanem az ellentétes oldalon újra megjelennek, tehát a kép állandóan körben 
Commodore 64-eshez is kaphatóak. 

Képátfutás nélküli gördítéskor a kilépett kép nem tűnik fel ismét a másik oldalon, hanem 
helyette üres sorok jelennek meg, és az eredeti kép néhány átfordulás után eltűnik. 
Ha később a grafikában akarjuk ezeket az utasításokat használni, nem fogunk sikerrel 
járni. Grafikához csak speciális grafikus bővítőóprogrammal (pl.: a SUPERGRAPHIK 64) 
tehető alkalmassá. Egy ilyen program csak a grafikus megjelenítésre koncentrál és ezen 
kívül számos egyéb lehetőséggel rendelkezik. 

Még egy apró technikai megjegyzés: próbáljuk ki a példákat, nem okoznak csalódást. 


9.5.1 LEFT — gördítés balra 
Formátum: LEFTW s,o,sz,m 
Paraméterek: s — sor (0—24) 

o — oszlop (0—39) 

sz — a tartomány szélessége és 

m -— magassága 
Funkció: a képernyő gördítése balra 
Példa: LEFTW 5,73,4 
Ez az utasítás — mint a neve is mutatja — a kijelölt képtartományt balra gördíti. Első két 
paramétere a tartomány helyét mutatja a képernyőn, az m és sz pedig a tartomány 
méreteit. Az s és o abszolút-, az m és sz relatív paraméterek. Ez azt jelenti, hogy m és 
sz értéke nem lehet nagyobb, mint az s és o által meghatározott kezdőpont és a képer- 
nyőhatárok különbsége. Ha pl. a tartomány bal felső sarka a 10. sor 10. oszlopában van, 
akkor m értéke max. 14 lehet, mert ennyi sor marad a képernyő aljáig. Hasonló elven 
sz nem lehet több, mint 29. Ezeket a határokat átlépve a téglalap kilóg a képernyőből, 
míg m—-0 és sz—0 értékadás esetén "BAD MODE" hibaüzenetet kapunk. Mint látjuk, a 
paraméterek szintaktikája összhangban van a képtartományt vezérlő utasításokkal, ami 
természetesen célszerű, hogy így legyen. 
(A SIMON ss BASIC kézikönyv szerint ilyen esetben hibaüzenetet kapunk, de ez szeren- 
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P. 46 

1 REM KtttiktkErKK 

szg va szi 4 Is, SRI LESR szdőői szög Mt, 

2 REM Erkki tttb 

134 FEHMH 

148 PRIMT CHR$-147: 

158 A$-"CEM s4d ———-3IMON"-3 BASIC//7":REM FELIRAT DEFINIRLASA 

160 PRINT AT-C7.122 A£:FEM FELIRAT POZICIOHALASR 

170 FÜR szi TO 216 

183 LEFTWH 12.7.LEM(R$),1:REM LEN€CA$1-RAZ A$ HOSSZA 

194 FOR YzX TŰ 168:MEXT Y:REM GYÜRSÜLŰ  GORHITES 

za NEXT A 

219 FOR £-216€ TO 1 STEF- 1 

22a LEFTWHW 12.7.LEM(A$) 1 

23a FÜR Y-X TŰ 186:HEXT Y:REM LASSULÚ GÖRDITES 

248 NEZT A 

258 FRINT 

zEn CENTRE"MEGGTÜZÜNÜTT?" 
Most már tudjuk, mi olyan vonzó ezekben a scrolling utasításokban. A példánkban egy 
futó feliratot jelentettünk meg, amely kezdetben egyre gyorsabban mozog, majd fokoza- 
tosan lassul. A program kulcsa a 190. és a 230. sor késleltető ciklusai, melyek időtartama 
X aktuális értékétől függ. Ez az aktuális érték a 170—200. és a 210—240. sorban elhelyezett 
ciklusok hatására először növekszik, majd fokozatosan csökken. A mozgó felirat folyama- 
tossága érdekében a W szekunder utasítást használtuk, ennek hatására a bal oldalon 
eltűnő szöveg a jobb oldalon ismét megjelenik. 


9.5.2 RIGHT - gördítés jobbra 
Formátum: — RIGHTW s,o,sz,m 
Paraméterek: s — a tartomány bal felső sarkának sor (0—24), és 
o - oszlop (0-39) koordinátája 
sz — a tartomány szélessége és 
m - magassága 
Funkció: a kijelölt tartomány gördítése jobbra 
Példa: RIGHTW 4,5,6,7 
A RIGHT a LEFT utasítás ellentéte. Hatására a meghatározott képernyőtartomány szöve- 
ge jobbra gördül. Elméletileg ez az utasítás ugyanúgy működik, mint a LEFT, de sajnos 
csak elméletileg, mert itt is találunk egy kisebb (szerencsére azonban nem komoly) 
szépséghibát. 
A hiba folyamatos jobbra görgetésnél figyelhető meg legjobban. Mint a példában is 
láthatjuk, az utasítás feldolgozása közben a tartomány bal szélén különböző karakterek 
villannak fel. Az utasítás végrehajtása után ezek a jelek eltűnnek, így valóban csak egy 
kis szépséghibáról van szó. 
Reméljük a későbbi programváltozatok ezt a hibát már nem fogják tartalmazni. 
De magyarázkodás helyett inkább nézzük a példaprogramokat: 
P. 47 
1 REM E4E3EREKEFEKEEEK 
2 REM 5 1.RK TB HT A 
3 REM tétkterkdédet kk 


134 REM 
148 FRIHT CHR$-id77 


a PRINT HTé2, go "k": REM SZIMHUSZGORBE RAJZOLASRA 


199 NEAT A :REM 46-SZEKR 
19AGASZ zeszzzénsz HOGY TETSZIK?-——— henem eemesmemnett 


29 FÜK --4m TŰ 1 jeFséesl 
a RIGHTE 6.0. 48.25:REM GÜRDITEZ JOBERA. ARTFUTAS NELKUL 
a PRINT ATCA,SIMHINEC-A$.X.15:REM FELIRAT BEGORIITESE 


zs FEINT HT(A. 6. 

z46 FRINT AT(B.1297£" 

258 FRINT HT-iG6.153275":REM ERRAKTER BEVITEL 

266 MEXT 5:REH 468-SZER 
Példánkban egy tetszőleges szöveg beúsztatását mutatjuk be. A fenti módszerrel bármi- 
lyen hosszú szöveg is kiíratható. A szöveg beúsztatását a következő módon értük el: 
Minden egyes jobbra léptetést követően, a következő kiírandó karaktert a képből éppen 
kifutott karakter helyére írtuk. A sztringben tárolt szöveget így karakterenként "utántölt- 
jük" a MID$ BASIC utasítás segítségével. Ez az utasítás (lásd CBM64 kézikönyy) az adott 
füzér tetszőleges részét kiemeli. ; 
Az adott füzér az utasítás szót követő zárójel első eleme. (Sziktaktikája MID$(fk$;a,l) 


Részletesebb leírást a felhasználói kézikönyvben találunk. 
Hasonlóan látványos példát találunk a DOWN utasításnál is, de egyelőre lássuk nem 
kevésbé szórakoztató 2. példánkat, a két utasítás (RIGHT/LEFT) kombinációjára: 
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1 REM EXXEKEEKKÉEE kk 

2 REM 2. RIGHTA 

3 REM seegededek teged 

138 REM 

148 FRINT CHR$(147) 

158 FÜR X-6 TO 39 

169 Y-12XSINCX/3)4t12:REM AZ ERTEKEK KISZAMITASRA 

178 PRINT AT(X.92"k":REM SZINUSZGORBE RAJZOLASRA 

1989 MEAT A 

199 FOR vYz1 TO 5 

20A FOR A-1 TD 40 

219 LEFTH A, 8,29,25:REM BAL OLDALI RESZ 

229 RIGHTUH 6, 29. 29.25:REM JOBB OLDALI RESZ 

238 NEXT X:REMH GORDITES KIFELE 

240 FOR Az1 TO 40 

259 RIGHTUM ú.9.28.25:REM BAL OLDALI RESZ 

2E€ú LEFTUH 0529.28.25:R-M JOBB OLDALI RESZ 

278 NEXT X:REM GORDITES BEFELE 

298 NEXT vV:REM 5-SZOR IDE-ODA 

258 WRIT .198 ,255:REM VARAKOZAS EGY GOMB LENYOMASARA 
Egy megjegyzés: a 290. sor egy eddig nem használt utasítást tartalmaz. Leírását a 
CBM64-es felhasználói kézikönyv tárgyalja. Itt nem is térünk ki rá részletesen, csak 
megemlítjük! 
A WAIT 198,255 kifejezés egy billentyű lenyomására vár, ami a GET utasítással lekérdez- 
hető. Vagyis a 


WAIT 198,255 : GET A$ 
utasítások az alábbiakat helyettesítik: 
GET A$ : IF A$ — " " THEN GOTO 10 


A billentyűzet-pufferben maradt karakter a POKE 198,0 utasítással törölhető ki. (A 198-as 
címen az operációs rendszer a lenyomott billentyűk mennyiségét, vagyis a pufferben 
található karakterek számát tárolja, maximum 10-et.) 


9.5.3 UP - gördítés felfelé 


Formátum: UPW s,o,sz,m 

Paraméterek: mint a RIGHT utasítás esetében 
Funkció: a kijelölt tartomány gördítése felfelé 
Példa: UPW 10, 10,-5:6 
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Az előbbi két utasításnál leírtak erre az utasításra is teljes egészében vonatkoznak. Az 
UP a képernyő kijelölt tartományát felfelé görgeti a már jól ismert kétféle módon (9.5 
fejezet bevezetése, W és B). 
A RIGHT és LEFT utasítással részletesen foglalkoztunk, a további ismertetés csak ismét- 
lés volna. Inkább nézzünk meg egy kis példát: 

P. 49 

1 REM ktkkdökk 

2 REM$UP 

"3 REM €kkiekekik 

130 REM 3 

1468 PRINT CHR$(1472:REM KEPERNYÜ TORLES 

154 PRINT"RUN/STOP -PRAL" 

168 PRINT"MEGSZAKITHATO!" 

179 FÜR X-1 TO 11 3 

194 PRINT AT(XH15.X2CHR$(189) :REM 1. ATLOS KARAKTEREK 

198 NEXT X 

268 FOR SzíZ TŰ 23 , 

218 PRINT AT(23-Xt15. X5ILHR$(119829 :REM 2.ATLOS KARAKTEREK 

228 NEXT s 

23a PAUSE 2 5 

240 UFU 4. 15.172.24:REM GÜRDITES FELFELE 

zsa GüTO 249 3 


A kurzorpozíció számítását az AT utasításban még nem tárgyaltuk. Röviden a követke- 
zőkről van szó: Az első ciklusban (170.—190. sorok) a bal felső sarokból a jobb alsóba futó 
átlót számítjuk ki pontról pontra. Az AT-utasítás zárójelében szereplő első érték az 
oszlopokra vonatkozik. Az X értéke ciklusonként 1-gyel növekszik, a 15 hozzáadásával 
pedig az adott pontot a képernyőn 15-tel jobbra toljuk. 

A második érték a sorokra vonatkozik. Itt az X értéke szintén ciklusonként nő. Így elértük, 
hogy minden sorba csak egy pont jusson. 

Ugyanígy történik a másik átló meghatározása is (200.—220. sorok), a különbség csupán 
annyi, hogy az oszlopok értéke ebben az esetben növekedésével folyamatosan csökken, 
mivel egyre nagyobb számot kell a 23-ból kivonni. A többi teljesen analóg az előbb 
leírtakkal. Érdemes gyakorlásképpen néhány hasonló összefüggést kidolgozni. 


9.5.4 DOWN -— gördítés lefelé 


Formátum: DOWN s,o,sz, m 

Paraméterek: mint a LEFT utasítás esetében 
Funkció: a kijelölt tartomány gördítése lefelé 
Példa: DOWN 1,0,10,15 


Az utolsó gördítő utasítás. 

Ha még nem tudjuk pontosan az egyes paraméterek jelentését, nézzük meg még egyszer 
a LEFT utasításnál leírtakat. Ha készen vagyunk, folytassuk. 

A RIGHT utasításhoz hasonlóan a DOWN utasítás sem problémamentes, de az utasítás 
végrehajtása után a különböző felesleges jelek itt is eltűnnek. (Lásd az alábbi motocross- 
példát.) ; 

Az utasítás feldolgozása közben idegen karakterek villannak fel a blokkszélen és a mező 
felső peremén. A képernyőn lévő képet a különböző jelek véletlenszerűen felvillanó sora 
zavarja meg. (Pl. — karakter.) 

Ezek a hibák nem minden esetben a szoftver hibái. Előfordulhat, hogy hardver-probléma, 
vagyis a gép képvezérlő egységére (VIDEOCONTROLLER) vezethetők vissza. Mindezek 
ellenére, az alábbiakban a DOWN utasítás különösen érdekes felhasználási lehetőségét 
mutatjuk be, egy rövid program keretében. 


apa 


Természetesen a többi példához hasonlóan ez a program is összevonható néhány 
sorban. A tömörítés azonban károsan zavarná az alkalmazás bemutatását. 
Próbáljuk meg mi a program rövidítését: 


P. 50 


1 REM deedetetek ke kekedek 

2z REMENDWNNE 

3 REM $iekkegitegee desk 

138 REM 

i49 REM Mitkeetkekkik 

1538 REM MOTOCROSS 

i6b REM Htekkkkekiek 

178 REM 

180 FRINT CHR$(147? 

199 PÜKE 53248433, 13:REM HATTEREVILAGOSZOLII 
299 xz19:REM AZ UTFÜZICIÚ KEZDETE 

219 RYSZCHR$(152:REM RYS/7ON 

2228 SC$-CHR$(1449:REM FEKETE 

239 GR$zCHR$(1522:REM SZURKE 

249 STEZRVETSCETRT I" 4BRÉT" ! ÖNLÉ gre DE Zagákél sad 
z2z5ü REM UT: FEKETE SZEGELY - SZURKE BURKOLAT(IG SPACE? -FEKETE SZEGELYv 
2E0 XzX4$HPND(1242-1 :REM 0.1.,-1 A KANYAROK VELETLENSZERIJ ELOALLITASA 
27 IF ACú THEN Azű 

289 IF 4238-LEN(ST$) THEN 4-38-LENK(ST$? 

g REM A NEM ENGEDELYEZETT ERTEKEK KIZARHASR 
aa DOUHNE 0.A.d49.25:RE4 AZ IJT LECSUSZTATASA 
18 PRINT ATCA.HISTE; "REM UT RAJZOLÁSA 

20 GOTO 264 


A program íutását csak a RUN/STOP billentyűvel állíthatjuk meg. 
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9.5.5 Ellenőrző kérdések 
A fejezet végén néhány ellenőrző kérdés az ismeretek elmélyítése érdekében. 


1. A 6. és 10. sor, valamint 5. és 13. oszlop által bezárt tartományt egy karakterrel 
— képfutás nélkül - feljebb kívánjuk hozni. Melyik a helyes formátum? 


) UPW 6,10,5,13 
) UPD 6,10,5,13 
) UP D 6,5,9,5 
) UPW 6,5,9,5 
) UPW 6,5,9,5 


2. A teljes képernyőt kívánjuk átlósan jobbra lefelé képátfutással eltolni. Melyik a helyes 
kombináció erre a célra? 


a) RIGHTW 0,0,40,25 : DOWN 0,0,40,25 
b) LEFTW 0,0,10,25 : UPW 0,0,40,25 

c) Nem megoldható 

d) Egyik sem a fenti megoldásokból 
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10. FEJEZET 
BEVITELVEZÉRLÉS 


10.1 FETCH - a bevitel ellenőrzése 


Formátum: FETCH "ell", h, val 


Paraméterek: "ell" — ellenőrző füzér 

h -abevitel maximális hossza 

val - tetszőleges típusú változó 
Funkció: A bevitel ellenőrzése, a hibás beadás kiszűrése 
Példa: 10 FETCH "12345" ,1,X$ 


Ez az utasítás az INPUT utasítás minden lehetséges hátrányát kiküszöböli. A program 
bevitelének ellenőrzése fontos feladat, nehogy az alkalmazó hibája miatt a program ne 
működjön. 

Pl.: egy füzérbe 5 jegyű érték beolvasásához nem célszerű az "INPUT A" formát használ- 
ni. Ugyanis könnyen előfordulhat, hogy az alkalmazó 5-től eltérő szám - vagy betű — 
billentyű lenyomásával hibaüzenetet idéz elő. 

A FETCH utasítás alkalmazásával 5 jegyű szám bevitele az alábbi módon hajtható végre: 


FETCH"0123456789" ,5,A$ 


Ezáltal a számítógép kizárólag a 0 és 9 közötti számjegyeket fogadja el és tárolja az A$ 
füzérbe. Az utasításba olyan vezérlőkarakterek is beírhatók, melyek a rögzítés szempont- 
jából egy meghatározott tartományt fognak át. 


CHRS$ (19) - csak nagybetűk (CHR$ (65)-től CHR$ (90)-ig 
CHR$(17) — számjegyek és speciális karakterek (CHR$ (32)-től CHR$ (64)-ig) 
CHR$ (29) - nagybetűk SHIFT-tel és anélkül 


A FETCH-utasítással az alábbi módon történik egy 12 karakteres füzér (A$) bevitele, mely 
csupán nagybetűket tartalmazhat: 


FETCH"CHR$(19)", 12,A$ 


Bevitelkor a karakterek csak az INST/DEL billentyűvel törölhetők, de a megfelelő számú 
karakter beírása után a számítógép már csak a RETURN-t fogadja el, az INST/DEL 
funkcióját blokkolja. 

A programozás során gyakran előfordul az igen/nem kérdésvariáció. Az eddigi ismere- 
teink szerint a GET utasítással ez így valósítható meg: 


10 PRINT"PROGRAM BEFEJEZŐDÖTT ([/N)?" 
20 GET X$:IF X$ "I" AND X$ "N" THEN 29 

30 IF X$— "1" THEN END 

40 ... 


A FETCH alkalmazásával elegánsabban tudjuk ugyanazt megoldani: 


10 PRINT"PROGRAM BEFEJEZŐDÖTT ((/N)?" 
20 FETCH "IN",1,X$ 

30 IF X$ — "I" THEN END 

40 zi 


Különbség a két megoldás között még az is, hogy a FETCH utasítással végzett karakter- 
bevitelt a RETURN-nel le kell zárni. 180 


10.2 INKEY - a funkcióbillentyűk lekérdezése 


Formátum: INKEY 


Paraméterek: — 
Funkció: a lenyomott funkcióbilletyűk lekérdezése 
Példa: A-INKEY (a lenyomott funkcióbillentyűt az , A" változóban tárolja) 


Az INKEY utasítással a lenyomásra váró funkcióbillentyű száma (1—16) adható meg. 
A Commodore 64-es összesen 8 funkcióbillentyűvel rendelkezik, ami a C— billentyű 
használatával kibővíthető 16-ra (lásd a 2. fejezetet). 

Ezzel az utasítással egy megnyomott funkcióbillentyű számát tudjuk tárolni az előzetesen 
már definiált változóban. A változó 0 értéket kap, ha egyik billentyűt sem nyomjuk le. Az 
alábbi kis program egy funkcióbillentyű lenyomására vár, melyet kijelez a képernyőn: 


10 X-INKEY : IF X—O THEN 10 
20 PRINT " A FUNKCIÓBILLENTYŰ SZÁMA: "X 
30 GOTO 10 


A program csak RUN/STOP-pal hagyható el. 

Mivel a Commodore 64-es csak 8 funkcióbillentyűvel rendelkezik, és csak ezeknek van 
ASCII kódja (133-140), ezért elmaradt az ASCII! lekérdezése. A további 8 billentyű kizáró- 
lag az INKEY utasítással kérdezhető le. Egy program során működő funkcióbillentyű 
lekérdezésére többek között menüvezérlésnél van szükség, például: 


VÁLASSZA KI A KÍVÁNT FUNKCIÓT 


F1 — CÍM BEVITELE 
F2 — CÍM TÖRLÉSE 

F3 — CÍM KIJELZÉSE 
F4 — CÍM BEOLVASÁS 
F5 — CÍM TÁROLÁSA 


Az előbbi menü választási lehetőségét az alábbi program valósítja meg: 


100 A— INKEY: IF A— d THEN 188 
110 GOTO (Ax19--110) 

120 CALL BEVITEL 

130 CALL TÖRLÉS 

140 CALL KIJELZÉS 

150 CALL BEOLVASÁS 

160 CALL TÁROLÁS 


Természetesen lehetőség van döntéshozatalra is a funkcióbillentyűk használatával: 
KIVITELT A NYOMTATÓRA (F1) VAGY KÉPERNYŐRE (F3) 
Az ehhez tartozó vezérlő programsorok: 


100 A— INKEY : IF A—O THEN 100 
110 IF A—- ( THEN CALL NYOMTATÓ 


10.3 RESET — a DATA mutató állítása 


Formátum: RESET ssz 

Paraméterek: ssz — annak a DATA-sornak a száma, amire a DATA-mutatót állítani kell 
Funkció: A DATA-mutató ráállítása a READ-del olvasandó sorra 

Példa: RESET 199 (A következő READ a 100. DATA sort kezdi olvasni) . 
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Az előre meghatározott konstans értékek nagyszámú tárolására a DATA-READ utasítás- 
párt használjuk. 

A DATA-sorokban lévő értékek READ-del történő olvasását követően a mutató a soron 
következő DATA-értékre áll, amit a következő READ olvas be stb. 

Az "OUT OF DATA ERROR?" hibaüzenet akkor jelenik meg, ha a meglévőnél több DATA 
értéket akarunk olvasni. A mutatónak az első DATA értékre történő visszaállítását a 
. BASIC-RESTORE utasítás végzi. 

Az alábbi programrészlet tóvábbi magyarázattal szolgál: 


200 DATA PÉTER, GÁBOR, TAMÁS RÓBERT, GÉZA, £ 
300 DATA 0,1,2,3,4,5,6,7,8,9,A,B,E,D,E,F, § 

400 DATA 102,103,105,108,123,120,142,189, 

500 DATA PÉCS, EGER,ZIRC,SOPRON, r 


SIMON s BASIC-ben a RESET 130-at kell megadni és a DATA mutató máris a 130. sor első 
értékére áll. Ha a definiált sor nem létezik, vagy benne nem DATA értékek szerepelnek, 
a program automatikusan a következő sorra áll. 

Így történik a RESET egyedi beállítása: 


10 PRINTÍKÉREM, VÁLASSZON! 


20 PRINT 

30 PRINT" 1 -— NÉV" 

40 PRINT" 2 — HEXA - ÉRTÉK" 
50 PRINT" 3 — SZÁM" 

60 PRINT" 4— VÁROS" 

70 FETCH"1234",1,A$ 

80 IF A$— "1" THEN RESET 200 
90 IF A$— "27 THEN RESET 300 
100 IF A$— "37 THEN RESET 400 
110 IF A$— "4" THEN RESET 500 
120 READ A$ 

130 IF A$— "4" THEN END 

140 PRINT A$ 
150 GOTO 120 


Ha az előző DATA sorokat beadjuk, akkor a program a kívánt eredményt fogja adni. 


10.4 Ellenőrző kérdések 


1. A FETCH 70123456789ABCDEF$",3,A$ utasításokból melyik karakterek nem kerülnek 
beolvasásra? 


a) $87 
b) $FF 
c) A$A 
d) CS 
2. Milyen karaktereket fogad el az FETCH CHR$ (19),3,X$ utasítás? 
a) Csak számjegyeket és különleges karaktereket. 
b) Csak nagybetűket SHIFT-el és anélkül. 
c) Csak nagybetűket. 


3. Az INKEY utasítással hány funkcióbillentyű ellenőrizhető? 


6 
5 


6. ÖBB 
EL szaj tségya (dzszét 


8 

1 

1 

TA 

4. A DATA mutatót melyik utasítás képes egy tetszőleges sorra beállítani? 
a) RESTORE 


b) RESET 
c) CRESTORE 
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11. FEJEZET ps 
BE- ÉS KIVITELI UTASÍTÁSOK 


11.1 Lemezegység parancsok, utasítások 
11.1.1 DISK 


Formátum:  DISK "parancs" 

Paraméterek: parancs -— bármilyen lemez parancs lehet 

Funkció: Egyszerűsített kommunikáció a futtatóval 

Példa: DISK "N:TESTDISK,MN" 
Ez a parancs a lemez formálását végzi és a következő parancsokat teljes 
egészében helyettesíti: 


OPEN 1,8,15, "N:TESTDISK,MN" 
CLOSE 1 


Az eddig alkalmazott parancsokat elhagyhatjuk, mert mindaz, amit azok tudnak, DISK-kel 
sokkal egyszerűbben végrehajtható. A parancs-csatorna nyitását és zárását is automati- 
kusan elvégzi. 

A következő listában a fontosabb disz-parancsokat foglaltuk össze: 


NEW - a lemez formálása 


Formátum: DISK"N:név,ID"7 

Paraméterek: név : a lemez neve, amelyet a felhasználó ad (max. 16 karakter) 
ID :alemez kétkarakteres azonosítója 

Példa: DISK"N:SIMON s BASIC, A1"7 


SCRATCH - file törlése a lemezről 


Formátum: DISK"S:1.filenév, 2.filenév,..." 
Paraméterek: 1.filenév, 2.filenév,... : a törölni kívánt file-ok neveinek felsorolása 
Példa: DISK"S:PRÓBA" 


RENAME - a file átnevezése 


Formátum: DISK"R:új név — régi név" 
Paraméterek: új név, régi név: az átnevezni kívánt file új és régi neve 


Példa: DISK"R:INFO-— INFO.TEST" 
Tehát az eddig INFO.TEST néven nyilvántartott file azután INFO néven fog 
szerepelni. 


INITIALISE -— a lemez inicializálása 


Formátum: DISK"/I" 
Paraméterek: -— 


VALIDATE - a lemez újraszervezése 
Formátum: DISK "V" 
"Paraméterek: -— 


A sokoldalú lemezmeghajló egységről a már említett VC 1541-es lemezegység progra- 
mozása című DATA BECKER-—- NOVOTRADE kiadványból szerezhetünk bővebb ismerete- 
ket. 3 

ne 


11.1.2 DIR 


Formátum: — DIR"$7 


DIR"$: füzér" 
DIR"$:?? füzér" 
DIR"$:t — ft" 
Paraméterek: füzér : file-név vagy a file-név része 
?x  : "Joker" (lásd a szövegben) 
ft : a file típusa (P- PRG? S-SEO; R— REL; ÚU—USR) 
Funkció: Kilistázza a lemez tartalomjegyzékét (direktory) vagy annak egy részét (2. , 


3., 4. változat) a tárban lévő BASIC-program törlése nélkül 
Példa: DIR"$7 
Kilistázza a teljes tartalomjegyzéket. 


Láthatjuk, hogy milyen sokoldalú ez az utasítás. Négyféle irásmódja van, amelyek egy- 
mással keverhetők is. A legelső változat a legegyszerűbb, és mint már tudjuk, a teljes 
tartalomjegyzék kilistázásához használhatjuk. 

Nézzük most a bonyolultabb változatokat. A csillag és a kérdőjel ún. "Joker"-ek. Akik már 
régebben programoznak, azok előtt nem ismeretlen ez a fogalom. 

A csillag segítségével szelektálhatjuk a tartalomjegyzéket úgy, hogy abból csak bizonyos 
file-neveket listázzunk ki. Például: a 


DIR "$:Ax" 


csak azokat a file-okat listázza ki, amelyeknek A-val kezdődik a neve. A név többi része 
a válogatás szempontjából nem lényeges. Ugyanígy működik a 


DIR "$:TEST" 


utasítás is, amely minden olyan file-t és csak azokat listázza ki, amelyeknek a neve 
TEST-tel kezdődik (Pl.: TEST.1, TEST.UJ, TESTPROGRAM,.. .stb.). 

A kérdőjel szerepe hasonló. Azokat a karaktereket helyettesítjük vele, amelyek a váloga- 
tás szempontjából nem lényegesek. (1 kérdőjel egy karaktert helyettesít!) A file-név 
elején vagy közepén is állhat. Példa: 


DIR "$ : ???.017 


Ez az utasítás azokat a file-okat listázza ki, amelyeknek neve 6 karakterből áll és utolsó 
három karaktere 7.017. A 


DIR "$ : TEST.??" 


viszont kilistáz minden olyan file-nevet, amely 7 karakterből áll és TEST.-tal kezdődik. 
A kérdőjel és a csillag kombinálhatók egymással, pl.: ; 


DIR"$:???.01" 


Ez az utasítás minden olyan file-nevet kilistáz, amelynek a 4., 5. és 6. karaktere "7.017. 
Arra is lehetőségünk van, hogy a file-okat típus szerint gyűjtsük ki. A 
DIR"$:r— P" 
utasítás például kilistázza a lemezen található összes programfile nevét. 
Ha idáig probléma nélkül eljutottunk, próbáljuk kitalálni, hogy a 
DIR"$:???.18r— P" 
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utasítás melyik file-ok neveiről fog listát készíteni. Az elméletnél sokkal többet ér a 
személyes tapasztalat. Próbálgassuk hát a DIR utasítás különféle alkalmazásait mindad- 
dig, míg minden érthetővé nem válik. 

A DIR programon belül is alkalmazható. Ennek bizonyságául hívjuk be a lemezről az ide 
vonatkozó programot: 


P. 51 

1 REH 344444kkk 
zZ REM$DIREH 
3 REM kitkkdkkikik 


199 PRINT"TARTALOMJEGYZEK LISTAZASA (I/N9?" 
118 REPEHT:GET Ss$:LNTIL. S$z"I" ÜR X$-"N" 

1zú IF A$z HM" THEM CALL TOVHBB 

138 ::FRINT CHR$(1477:REM KEPERNYO TÜRLES 

1 GTIR"SK" : REM A TARTALOMJEGYZEK LISTAZASA 
128 ::FRINT:FRINT" TŰVAEB CXRETURN5" 

168 :: REPEAT 

i7A ::::GET X$ 

1898 :: UNTIL S$zCHR$E(15 

199 PROC TOVABB 


A programot úgy célszerű felépíteni, hogy a DIR utasítás végrehajtása előtt törölje a 
képernyőt, majd a program " gombnyomásra" folytatódjon. 

Érdekes dolog, hogy miért törli a tárban lévő BASIC programot egy normál LOAD"§$",8 
parancs és miért nem törli a DIR. A különbséget a két parancs eltérő működése magya- 
rázza. Míg ugyanis a LOAD betölti a tartalomjegyzéket a főtárolóba, méghozzá $0801-től 
kezdődően a BASIC programok helyére (ezáltal a meglévő program természetesen 
törlődik), addig a DIR, mint egy file-t, byte-onként olvassa és közvetlenül ki is jelzi a 
képernyőn. 


11.1.3 SCRSV 


Formátum:  SCRSV lfsz, e, mc, "név, S, W" 
Paraméterek: lísz : logikai file szám 
e  : egységszám (kazetta— 1; floppy — 8) 
mc : másodlagos cím 
név : a képernyőn lévő file neve 
Funkció: Egy kisfelbontású (LOW RESOLUTION) képernyői kép tárolása 
Példa: SCRSV 1,8,2, "TEST.SCRSV,S,/W" 


A kisfelbontású képernyő, tehát az, amelyik a bekapcsolás után aktivizálódik, ezzel az 
utasítással kazettán vagy lemezen rögzíthető. Ez egyaránt vonatkozik kisfelbontású 
grafikákra és normál szövegre, amelyek tárolása szekvenciális file formájában történik. 
Nagyon előnyösen alkalmazható p!. képernyőmaszkok rögzítésére. A maszk alkalmazá- 
sa az adatrögzítés egyik módszere, hasonlít a nyomtatványok kitöltéséhez. Ahhoz, hogy 
a beviteli maszkot (nyomtatványt) ne kelljen minden esetben újra felépítenünk, elkészíté- 
se után tároljuk, majd szükség esetén újra betöithetjük. Az utasítás paraméterei ugyan- 
azok, mint amiket szekvenciális file megnyitásánál használunk és az alkalmazási előírá- 
sok is azonosak. Így pl. ugyanazzal a logikai file-számmal nem lehet a lemezen nyitott 
file, mert az a 


FILE OPEN ERROR 


hibaüzenetet fogja eredményezni. 
Pédaként hívjuk be a lemezről az SCRSV című programot. 
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P. 52 


1 REM $i4é4kkkkkkkkk 

RKEME S-€ KS Y 

REM ttetekletetete kek 

REM ; 

REM 

REM 

FRINT CHR$(147)0 

FRINT"NEV beaa lasan essénes.. ú 

145 FRINT ; ; 

158. PRINT"KERESZTNEY " a guáso a aa an da aaa k 
95 FRIHT 

1E9 FKINTSVUTCA [dns áá desask mas veg tú 

165 FRINT 

ü PRINT "HELYSÉG 0 "anal da ss aa ans e ágot 

[ 


a újlma 
aa aaa aa 


5 FRINT 
A FRINT/TELEFÜN AZA tá TES ze ka et GY a SM Á zár éstőL jó ál 
je. 1.978." TESZT: SCRSV-S.W" 

25 GOT 2Hia 
Az utasítás egyaránt alkalmazható programban és közvetlenül üzemmódban, de az 
utóbbi esetben figyelembe kell vennünk, hogy a képernyő részeként az SCRSV utasítás 
is rögzítésre kerül. 
A kisfelbontású képek tárolása célszerű eszköz a képinformációk rögzítésére. Kár, hogy 
nagyfelbontású (HIGH-RESOLUTION) megfelelője nincs. Ez a funkció az alábbi előnyök- 
kel rendelkezik és például SUPERGRAPHIK 64-gyel meg is valósítható. 


1. Pillanatok alatt betölthetők a lemezről olyan bonyolult grafikák (pl. háromdimenziós 
grafika), amelyek egyébként csak nehezen, bonyolult számításokkal állítható elő. 


2. A rögzített HIGH-RESOLUTION grafikák, amelyeket a legkülönfélébb programokkal 
készítettek a CMB-64-re, kompatibilisek. 


11.1.4 SCRLD 

Formátum: SCRLD lfsz, e, mc, "név" 

Paraméterek: lísz — logikai file szám 
e  —-— egységszám (kazetta— 1, floppy — 8) 
ma -— másodlagos cím 
név -— a képernyő-file neve 


Funkció: Az SCRSV-vel rögzített kisfelbontású (LOW RESOLUTION) képernyői kép 
betöltése 
Példa: SCRLD 1,8,2, "TEST.SCRLD" 


A TEST.SCRLD néven tárolt képernyői kép betöltése. 

Ez az utasítás tehát az előzőleg SCRSV-vel lemezre vagy kazettára rögzített képernyőtar- 
talmat tölti be. A képernyőn megjelennek azok az adatok, emelyeket a rögzítéskor 
tartalmazott. Lehetőségünk van tehát arra, hogy egy képernyői képet (grafikát vagy 
szöveget) egy extern programmal előállítsunk, rögzítsük, majd egy másik programmal 
ezt betöltsük és felhasználjuk. Pl. elkészítjük egy programmal az adatfelviteli maszkot 
és tároljuk. Ezután megírjuk az adatrögzítés programját, amelyben a maszk ismételt 
képernyői előállítása egyetlen (betöltő) utasításból áll. 

A következő program egy ilyen, előzőleg SCRSV-vel tárolt képernyő betöltésére szolgál. 


P. 53 

1 REM HEEX4ETEEEEEKK 

2 REMXKSERLDE 
. 3 REM KEKEFKEKKKEKK 

198 REM 

139 SCRLD 1.3.2. "TESZT. SÉCRSY" 
. 149 GOTO144 


A program RUN/STOP-pal szakítható meg. 
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Természetesen ugyanez közvetlen üzemmódban is beadható: 


SCRLD 1,8,2, "TEST.SCRSV" . 


11.1.5 Ellenőrző kérdések 
1. Törölni akarjuk a "TEST.SCRSV" file-t. Melyik parancsot alkalmazzuk? 


a) DISK"S:TEST.SCRSV" 
b) DISK"N:TEST.SCRSV" 
c) DISK"R:TEST.SCRSV" 


2. Melyik file-t nem jelzi ki a következő parancs: DIR"$:????.TE"? 


a) VARB.TEST 
b) KAO1.TE 
c) SCRL.TE 


3. Melyik file-t nem jelzi ki a következő parancs: DIR"$:??FILE$"? 


a) MNFILES 
b) MAFILE.PROGRAM 
c) FILEMANAGER 


4. Egy kisfelbontású képernyő megjelenítő képet akarunk lemezen rögzíteni. Melyik 
utasítást alkalmazzuk? 


a) SCRSAVE1,8,2, LOWRESO1,S,W" 
b) SCRSV 8.83, LOWRESO1",S/W 
c) SCRSV  2,8,2/LOWRESO1" 

d) SCRSV 5.83," LOWRESO1,S,W" 
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11.2 Nyomtatási parancsok, utasítások 


11.2.1 COPY 


Formátum: COPY 
Paraméterek: — 
Funkció: Hardcopy készítése egy HI-RES vagy MULTICOLOUR grafikáról 


A COPY-parancs automatikusan megnyitja és le is zárja a nyomtató csatornát, tehát nincs 
szükség az OPEN 1.4 és a CLOSE 4 parancsok beadására. 
Hardcopy-t az alábbi nyomtatókon készíthetünk: 


—- CBM VC—1520 

—- CBM VC-1525 

SEIKOSHA GP 100 VC 

EPSON RX-80, FX-80 (DATA BECKER interface-szel) 


Az új, VC—1526 típusra grafika nyomtatását teljesen más elven szervezték, ezért erre a 
COPY utasítás nem alkalmazható. (Egy speciálisan erre készített hardcopy rutint a 
SUPERGRAPHIK 64 című DATA BECKER kiadványban találhatunk). 

Ez az utasítás egyaránt alkalmazható programban és közvetlen üzemmódban. Ha prog- 
ramban alkalmazzuk, hozzáfűzhetjük a grafikát előállító programhoz, így egy programon 
belül megoldható a képernyői kép előállítása és kinyomtatása is. 

Ha a képernyői képet előállító programunk lefutott és a számítógép READY-vel bejelent- 
kezett, még mindig megtehetjük, hogy közvetlen üzemmódban beadjuk a COPY-t, annak 
ellenére, hogy a képernyő ilyenkor már szöveg üzemmódban (LOW RESOLUTION) van. 
A hardcopy elkészítéséhez tehát nem feltétlenül szükséges látnunk az adott képet a 
képernyőn. 


11.2.2 HRDCPY 


Formátum: HRDCPY 
Paraméterek: — 
Funkció: Hardcopy készítése a LOW RESOLUTION képernyőről 


Ezzel az utasítással a normál szöveg-üzemmódú képernyőről, amelyet lemezen is rögzít- 
hetünk, készíthetünk hardcopy-t. Néha szükség lehet arra, hogy az előállított képernyőt 
egy "gombnyomással" papírra vigyük. Ezt végzi a következő program: 


P. 54 

1 REM EXEEKEERTEKHER KEK 

2 RMNXEHRBCPYEA 

3 REM EEKREKKKEKKKETEEK 

199 REN 

118 FRINT"HARILOPY (IZBO7" 
i28d FETCH "IN", 15 A$ 

159 IF A$-"I" THEN HRICPT 
14 STÜF 
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11.2.3 Ellenőrző kérdések 
1. Milyen típusú képernyő hardcopy-ját készíthetjük el a COPY-val? 
a) HIGH-RESOLUTION 
b) MULTI-COLOUR 
c) LOW RESOLUTION 
2. Milyen típusú képernyő hardcopy-ját készíthetjük el a HRDCPY-val? 
a) HIGH-RESOLUTION 
b) MULTI-COLOUR 
c) LOW RESOLUTION 


3. Meg kell-e nyitnunk a COPY és a HRDCPY beadása előtt a nyomtatócsatornát (OPEN 
1,4)? 


a) igen 
b) nem 
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12. FEJEZET 
(Grafika) 


Végre eiérkeztünk a programozás csúcspontjához, minden potenciális számítógéptulaj- 
donos álmához, a programozás művészetének felső határához: A GRAFIKÁHOZ! 
Elsősorban a grafikakészítés képessége teszi a számítógépet igazán számítógéppé. Az, 
hogy meggyőzően, a lehető legnagyobb valósághűséggel tud információkat közvetíteni 
és hogy általa a laikusok is élhetnek a modern információfeldolgozás lehetőségeivel. Az 
akusztikai lehetőségekkel (szintetizátor) kiegészítve programozása szinte művészi szín- 
vonalra emelhető. 

Nem csoda tehát, hogy a Commodore 64-es tervezői fáradságot nem kímélve azon 
dolgoztak, hogy nagy népszerűségnek örvendő készüléküket mindezekkel a képességek- 
kel felrunázzák. A szoftverspecialisták feladata, hogy ezeket a lehetőségeket mindenki 
számára elérhetővé tegyék. Érthető, hogy a SIMON s BASIC sem nélkülözheti a grafikai 
utasításokat, bár általános programbővítésről lévén szó, nem vállalkozhat arra, hogy a 
CBM 64-es ezirányú képességeit teljes egészében kiaknázza. Akit bővebben érdekelnek 
számítócépének grafikai lehetőségei, annak a speciálisan e témával foglalkozó szakiro- 
dalmat ajánljuk, pl. a már nagyon olcsón megvásárolható SUPERGRAFIK 64-et. Ez 183 
utasításával és utasításkombinációjával próbálja a téma iránt érdeklődők igényeit kielé- 
gíteni. 

Térjünk ra most a SIMON ss BASIC grafikai utasításainak tárgyalásaira, előbb azonban 
a könnyebb érthetőség kedvéért ismerkedjünk egy kicsit a CBM 64 grafikus képességei- 
vel, lecajabbis ami a SIMON s BASIC-et érinti. Részletesebb ismereteket egyéb irodal- 
makból szerezhetünk. (pl. A Commodore 64-es belső felépítése stb. ..). 


12.1 ivéhány szó a hardverről 


Ebben ezetben megismerkedünk a számítógépes grafika készítésének alapjaival. 
A sprite-orat, a karakterkészletet és a szintetizátort a későbbiekben tárgyaljuk. 

A színek! 

A Commodore 64-es mind szöveg-, mind pedig grafikus üzemmódban 16 színt tud 


előállítani. Minden színt egy színkód felöl, amelyet bináris szám formájában a különböző 
regiszterek tárolnak. Ha pl. a video interface chip 32. regiszterének tartalma O, a képer- 
nyő keretszíne fekete lesz. 

A következő listában a színkódok találhatók: 


0 — fekete 8 — narancs 

1 - fehér 9 - barna 

2 —- vörös 10 — rózsaszín 
3 — türkiz 11 — szürke 1 

4 — ibolya 12- szürke 2 

5 — zöld 13 — világoszöld 
6- kék 14 — világoskék 
7 — sároa 15 — szürke 


A finom felbontású grafika: 

A számítógép kétféle grafikus üzemmódban működik. Ezek a finom felbontású és a 
többszínű üzemmód. Finom felbontású üzemmódban a képernyő vízszíntesen 320, függő- 
legesen 200 pontból áll, amely a képernyőn egyenletes elosztásban összesen 64 000 
pontot jelent. 

Természc:esen a grafikát ugyanúgy tárolni kell, mint a szöveget (lásd 9. fejezet). Erre 
szolgái a "rafikus tároló, melyben minden ponthoz 1 bit tartozik. A bit olyan információs 
egység ynek értéke 0 vagy 1 lehet. Egy karaktert (szót) 8 bittel (azaz 1 byte-tal) 
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ábrázolhatunk. 1 byte a nyolc bit kikapcsolt (0) és bekapcsolt (1) értékeinek kombinációjá- 
val 27— 256 különböző karakter előállítására képes. 

Egy byte tehát a képernyőn 8 pontot jelent, így a finom felbontású grafikus képernyő 
tárolásához 64000/8 — 8000 byte- 8K (kilobyte) tárkapacitás szükséges. Ezt a SIMON"s 
BASIC helytakarékosan a RAM-ban, az operációs rendszer ROM-ja alatt a $E000 és a 
$FF40 (vagy decimálisan az 57344 és a 65344) címek között helyezi el. Ha tehát POKE 
utasítással közvetlenül a képernyőtárolót akarjuk elérni, ehen az intervallumban kell 
gondolkodnunk. 

Mielőtt azonban ilyesmivel kísérleteznénk, nézzük meg, hogyan ís építi fel a számítógép 
a tárolt információkból a grafikus képet: 

A képtárolás alapja a grafikatároló 8 byte-ja által képzett 8 x 8 bitből álló mátrix, hasonló- 
an a szöveg-üzemmód karakterábrázolásához. A képernyőn 1 sorban 320/8-— 40, egy 
oszlopban pedig 200/8 — 25 ilyen mátrix fér el, amit a következő példán szemléltethetünk. 


1 2. . , 40. 
bit 0.1.2.3.4.5.6.7. 0.1.2.3.4.5.6.7. 
SZÖVEGE te ád Jet Tab KEZE NÉNS TON SÉS KENNEL ÁSÉÉT ŐS 
byte EA Éze TÉN lk SE ÉSZ e ő ÚR VLYVÉSS E 
57074 4 z SSNNNÉT ÉTÉ ELST EE e 
ÖVES fen. ke OSgS s E LÉ éS eg á jele a ESNTa, ÖDÁz 
DYLST jak eről s HŰ KELTE TSEt elk BZ: Hő 
tojva z alla ONNEZE AT TT TET TÉSEtT S ÓN 
DIEB S áGás Ráv s a szá HAKKI E ae EÜ ZÉSEL 
SZÖVTOS egés Ea kragéit ÉSÉT AAA Tes 


NONR9VDID 


200 byte 


A színmeghatározás szempontjából is fontos ismernünk ezt az elrendezést. A háttér 
(kikapcsolt pontok) és a bekapcsolt pontok egyaránt 16 féle színt vehetnek fel. (Ezek 
felsorolását lásd a fejezet elején). Ha mind a 64 000 pont színét egyenként akarnánk 
meghatározni, akkor ahhoz összesen 64 0004 — 256 000 bit-re, azaz 32 K byte tárkapaci- 
tásra volna szükségünk a RAM-ban. Ez nagyon sok, ezért egyedi színt csak 8 Xx 8-as 
mátrix számára határozhatunk meg úgy, hogy hozzárendelhetünk egy háttérszínt (a 
kikapcsolt pontok, vagy 0 értékű bitek) és egy pontszint (a bekapcsolt pontok vagy 1 
értékű bitek). Mivel ezek különböznek egymástól, végül is minden mátrix számára két 
színt adhatunk meg. Így már elegendő az 1K, amivel az ún. videoRAM rendelkezik. 
($000-$C3E7, vagy 49152-50151). Ebben minden byte felső négy bitje a pont, alsó négy 
bitje pedig a háttér színét tárolja. 
Egy adott pont vezérlése (bekapcsolása vagy lekérdezése) BASIC-nyelven az alábbi 
programmal valósítható meg: 

10 REM A PONT KOORDINÁTÁI: XÉSY 

20 AD — 57344:REM A GRAFIKUS TÁROLÓ BÁZIS-CIME 

30 DY — 320£INT (Y/8) -- (Y AND 7) 

40 DX — B:INT (X/8) . 

50 MA — 2A(7—-(X AND 7)) 

60 AV — AD 4 DY 4 DX 

70 REM PÉLDA:EGY PONT ELHELYEZÉSE (BEKAPCSOLÁSA) 

80 POKE AV, PEEK (AV) OR MA 
A SIMON s BASIC-kel ugyanez sokkal egyszerűbben megoldható, ezért ezt a programot 
nem szükséges elemeznünk: 
A következő példában azt mutatjuk be, hogyan állítható elő a POKE-utasítással egy 


színes csík: 
Hz 


10 HIRES 2,1:REM GRAFIKA BEKAPCSOLÁSA 

20 FOR X-— 57344 TO 65344 

30 PÓKE X,9611110000:REM A BYTE FELSŐ NÉGY BITJÉNEK BEKAPCSOLÁSA 
40 NEXT X 6 

50 WAIT 198,255:REM VÁRAKOZÁS EGY GOMB LENYOMÁSÁRA 


Ha lefuttatjuk, láthatjuk, hogy egy ilyen BASIC-program milyen lassú. 

Többszínű grafika: 

Tapasztaltuk, hogy finomfelbontású üzemmódban a számítógép színfelbontása nagyon 
kicsi. Ennek ellensúlyozásaként született meg az ún. multicolor üzemmód, amelyben a 
8 x 8-as mátrix egyszerre négy színt vehet fel, természetesen a felbontóképesség rovásá- 
ra. Ebben az üzemmódban kétszeres szélességűek a pontok, azaz minden pontot 2 bit 
tárol. Ennek megfelelően a képernyő vízszintes irányban 160, függőlegesen pedig to- 
vábbra is 200 pontból áll. 

A grafikatároló minden két bitje, amely 1 pontot jellemez, a blokk lehetséges négy 
színregisztere közül kijelöl egyet úgy, hogy a bitek értéke megegyezik a regiszter 
számával. (Szám alatt itt nem a színkódot (0—15), hanem annak a regiszternek a számát 
értjük, amely a színkódot tartalmazza). 

A négy színregiszter a következő tárolórekeszekben található: 


színregiszter bit-kód tároló 
[0 00 a VIC 3383-as regisztere 
1 01 a video-RAM alsó 4 bitje 
2 10 a video-RAM felső 4 bitje 
3 TA szín-RAM 


Ha tehát a grafikatároló megfelelő byte-jának tartalma 10, akkor a pont színe olyan lesz, 
amilyet a video-RAM-ban hozzátartozó byte felső négy bitje meghatároz. 

A VIC ( -— videocontroller) 33. regiszterének szerepét már ismerjük. Szöveg-üzemmódban 
a háttér színét rögzíti és a "POKE 53248--33, "f" utasítással vezérelhető. (f-színkód) 

A szín-RAM most az a tárolórész, amely a szöveg-üzemmódban a. karakterszínt rögzíti. 
Elméletileg tehát minden egyes 8 Xx 8-as mátrix részére 1-3 között variálhatjuk a színeket. 
A könnyebb érthetőség kedvéért tanulmányozzuk a következő programot: 


10 HIRES 2,1:MULTI 12,8,6:REM MULTICOLOR ÜZEMMÓD BEKAPCSOLÁSA 

20 FOR X-— 57344 TO 65344 

30 POKE X, 96 1100100 :REM 3 KÜLÖNBÖZŐ SZÍNŰ, 1 PONT SZÉLESSÉGŰ CSÍK 
40 NEXT X 

50 WAIT 198,255:REM VÁRAKOZÁS EGY GOMB LENYOMÁSÁRA 


Futtassuk le! A képernyőn 1 pont szélességű függőleges csíkok jelennek meg. Az első 
csík a MULTI-ban meghatározott 3. színben (11)— kék, a 2. csík háttér színű (00), a 3. csík 
2. színű (10)-orange, a 4. csík 1. színű (01) — 2. szürke. 

Ennyi elég is lesz az alapok ismeretéből. Nem fontos az elmondottakat megjegyezni, de 
a későbbiek során mindenképpen segíteni fognak a bonyolult grafikák megértésében és 
előállításában. 


12.2 Grafikus üzemmód és a színck meghatározása 


Koordináta-rendszer 

A SIMON ss BASIC a képernyőt finom felbontású-FFB üzemmódban 320 x 200, többszínű- 
(MULTICOLOR) MC üzemmódban pedig 160 x 200 pontra bontja fel. Ez azt jelenti, hogy 
az utóbbi esetben a pontok kétszer olyan szélesek, mint az előzőben. Ezt figyelembe kell 
venni a pontok koordinátáinak meghatározásakor. 
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A képernyő kiindulási pontja (x— 0; y— 04) a bal felső sarok, ahonnan az x-koordináták 
jobbra, az y-koordináták pedig lefelé nőnek. A képernyő utolsó pontja tehát a jobb alsó 
sarok, melynek koordinátái FFB-ben (319,199), MC-ben (159, 199). Nem létező (pl. 400,600) 
koordináta beírása. 


ILLEGAL OUANTITY ERROR 


hibaüzenetet eredményez. 
Az FFB és a MC színeit színfelbontását már az alapoknál ismertettük. 


Grafikát kétféleképpen készíthetünk: 
1. Grafikus üzemmódban úgy, hogy a kép közvetlenül megjelenik a képernyőn, elkészül- 
tét figyelemmel kísérhetjük. 

2. Szöveg-üzemmódban, úgy, hogy a rajz a "háttérben" készül és csak később jelenítjük 
meg. 


ÖSSZ 


A kevés rendelkezésünkre álló utasítással is viszonylag sok funkciót valósíthatunk meg 
az ún. rajzoló-üzemmód segítségével, amely minden grafikai utasításra (LIN,REC...) 
érvényes. Ezzel meghatározhatjuk egy pont, vonal, téglalap stb. megjelenési formáját. 
A kép tehát a rajzoló-üzemmód függvényében különbözőképpen jelenhet meg. A rajzoló- 
üzemmód kódjait és funkcióikat az alábbiakban ismertetjük: 


rajz üzemmód kódja funkció 
FFR-üzemmódban: 
0) a kép törlése 
a a kép rajzolása 
2 a kép invertálása 


MC üzemmódban: 

a kép törlése 

a kép rajzolása az 1. színregiszter színével 
a kép rajzolása a 2. színregiszter színével 

a kép rajzolása a 3. színregiszter színével, 
a kép invertálása 


ROD IaAO 


MC-ben az invertálás színcserét jelent a következők szerint: 


0. (háttér) és a 3. színregiszter színe között 

1. (háttér) és a 2. színregiszter színe között 

2. (háttér) és az 1. színregiszter színe között 

3. (háttér) és a 0. (háttér) színregiszter színe között 


Esetünkben kép alatt értünk minden olyan ábrát (pont, vonal, kör... stb.), amelyet SI- 
MON s BASIC utasítással elő tudunk állítani. 

Invertálás a bekapcsolt pontok törlését és az üres pontok bekapcsolását jelenti. 
Színregiszternek azt a tároló egységet nevezzük, ami a 8 Xx 8-as mátrix négy lehetséges 
színe közül egyet tartalmaz (lásd a fejezet elején!). A színregiszterben tehát azt a 
színkódot (0—15) tároljuk, amelyet az ehhez a regiszterhez tartozó pontoknak kell felven- 
niük. A 0. színregiszter mindig a háttér színét tartalmazza. 

A rajzoló-üzemmód a grafikai utasításokat rugalmas és változatokban gazdag utasítás- 
komplexummá bővíti. 

Ezek után térjünk rá a tulajdonképpeni grafikai utasítások megismerésére, legelőször is 
a grafikai üzemmód bekapcsolását eredményező utasításra. 
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12.2.1 HIRES - FFB üzemmód bekapcsolása 


Formátum:  — HIRES psz,hsz 
Paraméterek: psz — a pontok színének kódja (0—15) 
hsz -— a háttér színének kódja (0-15) 


Funkció: Bekapcsolja és törli a finom felbontású (FFB) üzemmódot, meghatározza 
a pontok és a háttér színét 
Példa: HIRES 78 


A háttér színe narancs, a pontoké sárga lesz. 


Ez az utasítás nyitja meg számunkra a grafika világát. Bekapcsolja a grafikus üzemmódot 
és beállítja a színeket. Ezt az utasítást használjuk a szöveg üzemmóadról grafikára történő 
átkapcsoláshoz. Egyidejűleg törli a grafikustárolót, tehát beírása után a képernyő kiürül. 
Ezt figyelembe kell vennünk, ha a program során többször vissza kell térnünk a szöveg 
üzemmódba. Ha azt akarjuk, hogy ilyenkor az előállított grafika ne vesszen el, az 
átkapcsolást más utasítással kell végrehajtanunk. A grafika megjelenítésekor természe- 
tesen a HIRES utasítás is alkalmazható. 

A grafikus kép törlésekor a grafikus tároló minden bitje nullázódik és csak a video-RAM- 
ból származó háttérszín marad meg. Ez és a később használatos pontszín a HIRES-utasí- 
tás két paraméterével állítható be: 

Az első érték a grafikus képernyő valamennyi bekapcsolt pontjának színét (a színkód 
felhasználásával) definiálja, ha másképp nem rendelkeztünk. Természetesen ez csak a 
finom felbontású (FFB) grafikára vonatkozik. Többszínű üzemmódban a színeket újra 
definiálnunk kell, és ez a második paraméterre is érvényes. Ez állítja elő a háttér, azaz 
minden kikapcsolt pont színét. Ezt látjuk pl. ha a HIRES utasítást követően a képernyőn 
egy törölt grafikus kép "jelenik" meg. Az itt előáflított háttérszínnek azonban nincs köze 
a szöveg üzemmódban COLOUR utasítással definiált háttérszínhez (lásd. 9.3. fejezet). 
Ezek csak többszínű üzemmód esetén egyeznek meg, mégpedig az azonos színregiszter 
miatt. 

Végül még egy megjegyzés: Grafikus képernyő csak programban állítható elő. Ha tehát 
közvetlenül írjuk be, akár a HIRES-, akár más hasonló utasítást, a számítógép végrehajtja 
ugyan, de rögtön vissza is tér szöveg üzemmódba. Ugyanez történik a program befejezé- 
sekor vagy megszakításakor is. A grafikus üzemmód a programon belül a CSET 0/1- vagy 
az NRM utasítással kapcsolható ki. (Lásd a 9. és 13. fejezetet). 

Egy kis trükkel elérhető, hogy a grafikus kép programon kívül is a képernyőn maradjon. 
Az alábbi háromsoros program ezt mutatja. Találkozunk két új utasítással is (MEM és 
BLOCK), amelyeket a későbbiek során fogunk megismerni. 


10 HIRES 6,7: REM GRAFIKA BEKAPCSOLÁSA 
20 MEM:REM KARAKTERKÉSZLET ELŐÁLLÍTÁSA 
30 BLOCK 0,0.319,105,0:REM A GRAFIKA FELSŐ RÉSZÉNEK TÖRLÉSE 


Futtassuk le a programot. A képernyőn megjelenik a C 64-es teljes karakterkészlete 
először egy pillanatig a HIRES-utasításban meghatározott színekkel, majd átvált fekete 
alapon piros karakterekre. (10—20. sor). Ez a színösszeállítás a továbbiakban megmarad 
és módosítani nem tudjuk. A 30. sor hatására a karakterek eltünnek és megmarad egy 
üres, fekete háttér. Ha most a programot egy rajzzal folytatjuk, az akkor is a képernyőn 
marad, ha a programot END-del fejezzük be. 
Próbáljuk ki. Hívjuk be a TRÜKK nevű programot és futtassuk le: 

P. 55 

1 REM EEKEKREEKEKKÉE 

2 REMETRUKK § 

3 REM Kekit kdkkkkkik 

199 REM : 
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119 HIRES 8.132:REMH GRAFIKA BEKRPOCSULASR 

129 MENM:REM KARRKTERKESZLET KIJELZESE 

1390 BLÜCK 2.ú.312.195.ú: REH A KARAKTERKESZLET TÜÖRLESE 

149 REM 

159 REM 4EKEFKEKKEE 

164 REM $ GEAFIKH £ 

170 REM $FEEEEFKEKE 

18ü REM 

198. FOR X-1 TÓ. 319 STEP 3 

298 FLÜTX.6EGEZSIN€5/2524186.1 

216 MEAT A 

224 END . 
A program lefutását a képernyő bal felső sarkában látható színes csíkok megjelenése 
jelzik. Ezek "eltüntetését" kísérletezőkedvű programozóinkra bízzuk. Mi elég, ha azt 
próbáljuk ki, mi történik, ha a MEM-utasítást tartalmazó sort kitöröljük. 
Ha már teljesen kiismertük ezt a kis programot, behívhatjuk a HIRES-utasítás tulajdon- 
képpeni példaprogramját és folytathatjuk a kísérletezést: 

P. 56 

i REM EXEEHEEEFKEKEKE 

2 REMEHIRESE$ 

3 REM EEREFEEEFKEHE 


138 KREM 
149 FOR HF-ú TŰ 14 :REM HATTERSZIN 
158 HIRES 12./HF :REH GRAFIKA BEKRFCSOLASR.TÜRLEZE ES SZINBEHALLITAS 


168 FOR X—-5S559264 TŰ 39583 

178 FÜKE 411110063:REM KEPERNTÜŰ RESZLET: CSIKÜK 

19898 MEAT A 

199 MEXT HF :REM KÖVETKEZO HATTERSZIM 

28 REM VEGE: YVISSZATERES A SZ0VEG-ILIZEMMONERA 
Mint látjuk, a program két egymásba épített FOR. ..NEXT ciklusból áll. A külső változtatja 
a háttérszínt (0-14), a belső pedig egy sor függőleges csíkot rajzol a HIRES-ben megadott 
15. színnel. A program végén, mivel más utasítást nem adtunk, visszatérünk szöveg- 
üzemmódba. 
Próbáljuk meg most a háttérszín helyett a pontszínt változtatni! 


12.2.2 MULTI - az MC-üzemmód bekapcsolása 


Formátum: MULTI 1.sz, 2.sz, 3.sz 

Paraméterek: 1. sz. — az 1. színregiszter színe (0—15) 
2. sz. — a 2. színregiszter színe (0—15) 
3. sz. — a 3. színregiszter színe (0—15) 


Funkció: Átkapcsolás FFB üzemmódról MULTICOLOR ítöbbszínű) üzemmódra és a 
háromféle pontszín meghatározása 

Példa: MULTI 4,5,6 
Háttérszín a HIRES utasításban megadott, a pontok színe pedig ibolya, zöld 
és kék lehet 


Mint a bevezetőben már olvashattuk, számítógépünk és ezzel együtt a SIMON s BASIC 
is rendelkezik az ún. többszínű üzemmóddal, ami a nagyfelbontású grafika csekély 
színfelbontását hivatott ellensúlyozni. Ebben az üzemmódban minden 8 x 8-as (azaz itt 
a duplaszélességű pontok miatt 4 x 8-as) mátrix négy színt vehet fel. 

A MULTI utasítás nem a HIRES-hez hasonlóan működik. 

Míg az utóbbi egy része egész sor funkciót lát el (grafikus üzemmód és a FFB-üzemmód 
bekapcsolása, a háttér- és a pontszín meghatározása), addig a MULTICOLOR feladata 
mindössze a FFB-ről MC-(többszínű)-re történő átkapcsolás és a megfelelő színek defini- 
álása. 

A MULTI utasítást követő három paraméterben a négy színregiszter közül háromnak a 
tartalmát határozhatjuk meg, amelyek a grafika pontjainak színét fogják tárolni. Hogy 
melyik ponthoz melyik regiszter (ill. szín) tartozik, azt a pont 2-bites információja rögzíti: 
01—1. regiszter, 10—2. regiszter, 11—3. regiszter. A háttérszínt tartalmazó regiszter 


125 


paramétere hiányzik. Ezt a POKE 53248--33, 0. szín — utasítással vagy a COLOUR-ral 
határozhatjuk meg. 
Az egyes színregiszterek címével és elhelyezkedésével a bevezetőben már részletesen 
megismerkedtünk (1. és 2. szín video-RAM-ban, 3. szín a szín-RAM-ban). 
Mivel a 3. színt a szín-RAM, azaz a szöveg-üzemmód színtárolója tartalmazza, a MULTI- 
COLOR üzemmód bekapcsolása után a szöveg-ablakban megjelenő karakterek, akár 
szövegről, akár grafikáról van szó, a 3. regiszterben tárolt színt fogják felvenni. Erről 
könnyen meg is győződhetünk, ha beadunk néhány karaktert, majd a 

MULTI 1,2,3 
parancsot. Változtassuk meg most a 3. paramétert és látni fogjuk, hogy az esetleg sok 
munkával összeállított színes szöveget egyetlen tiiasítással tönkretehetjük. Természete- 
sen ez fordítva is igaz. Ha tehát grafikakészítés közben a "háttérben" szöveget Írunk (ez 
is lehetséges), akkor ezeken a helyeken megváltozik a 3. szín. Ez persze nem. csak 
hátrány, hanem előny is lehet, ha ügyesen kihasználjuk. 
A további vizsgálódást folytassuk a lemezről betöltött MULTI című programmal: 

P. 57 
REM EEEEETEEETERE 
BERATV ebb E GE SEK 
EM kétöttrrtrkékt 


EM 
HESS Í7 98 


REM GRAFIKA S BEKAFCSOL HASA , TÜRLESE ES HATTERSZIN-KEK 
SCIM 


KAN, /O009999A : REH 1 CSIK A €-AS (HATTER? SZINNEL 
A :REM KÜYETKEZN EYTE 
FENT 
AtAD. /A1910181:REM 1 CSIK AZ 1.SZINNEL 
REM KÖVETKEZŐ BrTE 
szi6 TŰ 23 
stAD,-19g181818:REF 1 CSIK A 2.SZINMHEL 
5:REM A KÜVETKEZÜ BrTE 
:z4 Tü 31 

(EXHAUM.711111111:REM 1 CSIK A 3.SZINMEL 
MERT: REM AH KÜVETKEZÜ BEYTE 


PAUSE S-REM MEG CSAK AZ FFB VAN BEKAPCSOLVA! 

FOR XzE Te 15 ; 
MULTI Z.7.5:REMH MULTICOLAOR BEKAPCSOLASA ES A 3 SZIN KIVALASZTASHR: 
RÉMA SZIN: V"ALTOZO 

REM 2. SZIN: SERRGH 

REP-3e SZIH: ZOLR 


PRUSE. 1 

NET A 

REM 

REM A KÜVETKEZÜ SZIN VILLOGTHATASRA: 
FÜR A TÖTS 


[vati Én VÉkvökVÉLN EK VÉtÉkVÉVÉkván VÉNA VÉ ÉRTÉL KÉK VÉLVÉN hó 


MULTI 7.X.5:REM MULTICOLÜR BEKHFCSOLASRA ES RO 3 SZIN KIVALASZTASHR: 
: SAROR 


RR PB ARI ÚÚ 4 (d 44 (2 Cd 4 LO LO PI. TV TŐ De 
hol 


út e DID ÚN ÉN E ÜT EEG DI NN A 01 


a F VALTOZO 
448 zOLD 
42 
46 
431 


588 REM AL KÖVETKEZO SZIH VILLOGTATASR: 

319 FOR szi TO 15 

sza MULTI 7.23.5:REM MULTICOLOR BEKAPCSOLASA Es 
szd (REM- 1.5 : SARGA 

940 REM 2.SZIN: ZOLD 

suk REH 3. SZIN: VALTUZÚ 

sé FALSE 1 

s MESE ek 


0 
Dn 
(d 


SZIN KIVALASZTASHR: 


Láthatjuk, hogy a grafika különböző részei a színek szempontjából külön-külön vezérel- 
hetők. A grafikatárolóba a 180., 210., 240., és 270. sorokban írtuk be a megfelelő értékeket, 
de a PLOT-...stb. utasításokkal rajzolhattunk is volna valamint az adott színnel. 2-2 bit 
(ill. itt számjegy) értéke határozza meg azt, hogy melyik pont melyik színregiszterhez 
tartozik, azaz melyiknek a színét veszi fel. Tanulmányozzuk alaposan a programnak ezt 
a részét, módosítsuk a sorokat és figyeljük meg a következményeit. Csak így érthetjük 
meg igazán a leírtakat! 


12.2.3 NRM — a nagybetü-/grafikus jelkészlet bekapcsolása 
Formátum: NRM 
Paraméterek: — 
Funkció: Átkapcsolás grafikus-üzemmódról a nagybetű-/grafikus jelkészletre 
Ezt az utasítást a 9.3.3 pontban már részletesen ismertettük, ezért itt csak megemlítjük. 
Pillanatnyilag csak a grafikus üzemmódot kikapcsoló funkciója érdekes a számunkra, ezt 
illusztrálja a lemezről betöltött NRM című program: 

P. 58 

1 REM £££9.kkttb 

2 REM EHEN 

3 REM $táttktktk 

139 REM 
40 FRINT CHEXé1ld::k 
sa PRINT CHR3-147) 


ÜLHS ERT 7KI: BET JE RE 


160 CENTRE "MOST A l :ERINT 

17ú CENTRE "UZEMMOI VAM ERVENYBEN" :FRINT 

158 PRINT 16 

199 CENTRE "FIGYELJE H KÖVETKEZO" :PRINT 

200 CENTRE"LZEMETET!" 

219. FRÚSE 9 

zzz PRINT CHR$(14d75:REM SZUVEG-KEFERNTŐ TÜRLESE 


23ga CENTRE "EZ A 
248 REM 

250 FOR Yz1 TŰS 
266 PAUSE 2 

27 HIRES 7.6€6:REM FFB EEKAFOSULASASTTURLES (FÜNTSZIME-SHRSA? HATTER5KEK 
28 FOR Az5S39264 Tü 59583:kREMH EGY SÜRT JELENT H KEFERNYÜN 

298 FOKEX.r111198808:REM CSIKÜK RAJZOLHSHR 

300 NEAT A 

s19. PRUSE 2 

sza HRM: REM SZ0VEG-UZEMMOD VI35S 
3390 NEAT Y:REM 53-SZ R s 

246 PRINT:FRINT:REM 2 SÜREMELES 

35 CENTRE "AMINT LATJUK. AZ MRM":PRINHT 
360 CEMTRE"MAGYPETUKRE VALTOTT AT" 


ÜJVEGOLURL" : REM LZEHET AR 520 


VEGÜLERLÜKN 


ZAKAPCSOLASA NAGYBETU-/GRHAF IKLIS JELKESZLETRE 


37ú REN FALTOZTASSA MEG A Z111168008 ERTEKET A 239.SORERN PL.-1110009090-KE 


398 REM VAGY 711961199-KH! 


12.2.4 CSET 2 - a grafikus üzemmód visszakapcsolása törlés nélkül 


Formátum:  CSET2 
Paraméterek: — 


Funkció: Bekapcsolja a grafikus kijelzést anélkül, hogy a grafikus tárolót törölné 


A HIRES utasításnál már említettük, hogy van olyan SIMONss BASIC utasítás is, amely 
anélkül kapcsol át szöveg-üzemmódról grafikusra, hogy közben a grafikus tárolót törölné. 
Nos, ez a CSET 2 utasítás. A CSET utasításnak a későbbiek során (13. fejezet) még két 
változatával fogunk megismerkedni (CSET 0 és CSET 1). 

A CSET 2 újabb eszköz a grafikus műveletekhez. Feladata az: hogy a grafikus üzemmód- 
ból NRM-mel kapcsolt szöveg üzemmódot újból grafikusra váltsa, de eközben az előzőleg 
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kialakított grafikus képet ne törölje, tehát az megjeleníthető legyen anélkül, hogy ismétel- 
ten elő kelljen állítani. 

A program során tehát egy grafika rajzolása közben NRM-mel (vagy CSET 0/1-gyel) 
szöveg-üzemmódra kapcsolhatunk, kommentárokat és egyebeket fűzhetünk hozzá, majd 
újra lehívhatjuk a grafikát. A színekkel sem kell törődnünk, mert azok is megmaradnak. 
Úgy is alkalmazhatjuk, hogy a szöveg kijelzése közben a "háttérben" elkészíthetjük a 
grafikát és a megfelelő időpontban megjelenítjük. 

A számos alkalmazási lehetőség közül a példaprogramunk egyet mutat be: 


P. 59 

1 REM EtEEEEEEEEEEEEK 
2 REM $£C E: TT kk 

3 REM HESEEEEKEKEEER 

198 REM 

146 FRIHT CHE$(C1472:REM SZúVEG-KEFERNTÜ TÖRLES 
158 CEMTRE "Ez R SzüYEGOLORL":REM UZEMNET A SZÜvVEGÜLDRALUN 
169 FPHUSE 2 


170 HIRES 7.25 REM FFB EEKAPCSULASARTORLESÉFŰ IMTSZIM-S :ARGA? HATTERSZIN-VORÜS 


199 FOR A-S5z64 TŰ 59583:REM EG -RNyYüM 
194 POKEA.711119689:REM CSIK RAJZOLASR 

208 NEST XX 

219 FÜR 4-1 TO 5 

22A FAUSE 2 


239 NRM:REM SZ0YEG-UZEMHON VISSZAKAPCSOLAZA NAGYBEETIJ-/BRRFIKUS JELKESZLETRE 


246 PHLSE 2 
258 CSET 2:REMH GRAFIKUS UZEMMON VISSZAKHPCSOLAZA TÖRLES ES 
268 NEAT A 
Mint látjuk, lehetőségünk van a grafikus és szövegüzemmódban történő párhuzamos 
munkára. Érdemes ezt a programot is részletesebben tanulmányozni, különös tekintettel 
a 190. sorra. A bináris érték változtatásával végezzünk néhány kísérletet. 


12.2.5 LOW COL - a színek újradefiniálása 
Formátum: LOW COL 1.szín, 2.szín, 3.szín 
Paraméterek: 1.szín — FFB: pontszín 

MC: színmeghatározás az 1.színregiszter számára 

2.szín — FFB: háttérszín 
MC: színmeghatározás a 2.színregiszter számára 
3.szín — FFB: nincs funkciója  " 

MC: színmeghatározás a 3.színregiszter számára 
Funkció: A pontok színének újradefiniálása 
Példa: LOW COL 3,6,2 
Eddigi ismereteink alapján felmerülhet a kérdés, hogy valamennyi pont csak a HIRES-sel 
vagy a MULTI-val definiált egy ill. három színben jeleníthető-e meg. Nos, nem. Létezik 
egy olyan SIMON s BASIC utasítás, amellyel a következőkben létrehozandó pontok 
számára új színeket határozhatunk meg. Ez az utasítás a LOW COL. Az új színkombináci- 
ót az utasítás három paraméterével adjuk meg. FFB-ben csak az első kettőnek van 
jelentősége (pontszín és háttérszín), mivel minden 8 Xx 8-as mátrix-ra csak egy pontszín 
és egy háttérszín adható meg. Az első érték jelöli a pont színét, a második pedig a háttér 
színét (mint ahogy ezt már a 12.1 pontban olvastuk, minden 8 Xx 8-as mátrix külön háttér- 
színnel rendelkezhet, mivel ezek az értékek szintén a video-RAM-ból (grafikus-színtároló 
származnak.) Erre a 2. HICOL példaprogramban még visszatérünk. 
Ettől eltekintve, ha nem akarunk SYNTAX ERROR-t előidézni, FFB-ben is mindhárom 
paramétert be kell adnunk. Az utolsót a számítógép nem veszi figyelembe, így az 
bármilyen érték lehet. 
Többszínű (MC) üzemmódban a 2. és 3. szín a 8 X 8-as (ill. 4x 8-as) mátrix további két 
pontszínét jelentik, hiszen ebben az esetben a háttérszínt a COLOUR utasítással egyszer 
már megadtuk. 
Első pillantásra egyszerűnek tűnik ez az utasítás, de majd látni fogjuk, hogy nem is olyan 
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könnyű bánni vele. A pont vagy grafika rajzolása ugyanis nem azonos a LOW COL előtt 
és után: 
A grafikus üzemmód HIRES-sel történő bekapcsolásakor vagy MC-re történő átkapcsolá- 
sakor a képernyő összes pontjainak színe már definiálva és a megfelelő színregiszterek 
tárolórekeszeiben rögzítve van. Így rajzoláskor nem kell a pontok színét külön megadni, 
mert miután a grafikus tárolóba egy pontot bevittünk, az automatikusan felveszi a színét 
a megfelelő színtárolóból. 
A LOW COL utasítás alkalmazásával más a helyzet. Ilyenkor a színekre vonatkozó 
információkon felül a színtárolóba is be kell írni a megfelelő pontszínt, azaz a grafikus 
tárolóba a pont előállításán (vagy tárolását) kívül még be kell írni FFB esetén a vonatkozó 
tárrekeszbe, MC esetén pedig a három színregiszterbe a színt is. Mivel a színregiszter 
egy tárolórekesze mindig egy 8 Xx 8-as (ill. 4 x 8-as) mátrixot vezérel, annak esetleg már 
bekapcsolt pontjai felveszik a LOW COL-lal megadott új színt, függetlenül a korábbi 
előírásoktól. Ha ezután ebbe a mátrix-ba LOW COL nélkül (azaz párhuzamos színdefiniá- 
lás nélkül) írunk, akkor a pontok ismét az eredetileg meghatározott színben fognak 
megjelenni. A LOW COL hatását a HI COL-lal oldhatjuk fel, amit a mintaprogramon majd 
részletesen is tanulmányozhatunk. 
Lényeges probléma az is, hogy két, egymást megközelítő, sőt keresztező alakzat közül 
melyiknek a színe érvényesüljön. Úgy kell elképzelni, mintha az egyik (a fontosabb) 
takarná a másikat. 
Kétféle megoldás is kínálkozik: 
1. Elsőként a háttérbe kerülő alakzatot rajzoljuk meg, utána az előtérbe kerülőt. Így a 

második rajz készítésekor a megfelelő pontok ennek a színét veszik át. 
2. A háttérbe kerülő alakzatot LOW COL utasítás nélkül, míg az előtérbe kerülőt LOW 

COL-lal ábrázoljuk. 
Az első esetben fontos a rajzolási sorrend betartása, a másodikban viszont lényegtelen. 
Töltsük be most a mintaprogramot és indítsuk el: 

P. 60 

1 REM EXEREREKEKEEKEEE ETEK 

2 REMXKIEON COLT 

3 REM tátktktákkktkktkkkk 


REM 

149 COLOLR §.1:REM KERETSZIM-FEKETE 

159 AB-Z:REM KET VONAL TAVOLSAGA 

168 REM 

179 FÚR 2-1 TO 2:REM KET RTFUTAS 

180 HIRES 7, 8:REM FFB BEKRPCSOLASASTÜRLESKPONTSZIN-SARGA? HATTER-FEKETE 
199 FOR Y-1 TO 15 

200 FOR X-1 TO 728 

218 PLOT X.YXAB,1:REM PONTSOR RAJZOLASRA (LD.A PLOT UTASITAST? 
228 NEXT X:REM 329 PONT (EGY SOR? RAJZOLÁSA 

23 LOM COL Y,E€.A:REM 2.SZIM MEGHATAROZASA - AZ UTOLSO PARAMETER FFB-BEN HAT.LAN 
248 MEXT v:REM SZIMYARLTAS 

259 FALSE 5 

260 NRI:REM ATKAFCSOLAS SZOVEG-UZEMMODRA 

278 PRINT CHR$(1479:REM KEPERNYO TÜRLESE 

290 CENTRE"NEZZUK MEG MI TÖRTENIK,HA":PRINT 

299 CENTRE "A VONALAK TUL KOZEL KERÜLNEK" :PRINT 

309 CENTRE "EGYMASHOZ!" :PKRINT 

319 PRINT 

329 CENTRE "AZ ALACSORY SZINFELBONTAS":PRINT 

339 CENTRE"üKÖZZR!" 

344 PALSE 39 
"35 AB-2:REM VONALTRYOÓLSAG 

360 MNEXT Z:REM RAJZOLAS UJBOL, KISEBB VONALKOZZEL 


A program 210. sorában egy még ismeretlen utasítással, a PLOT-tal találkozunk. Funkció- 
ja egy pont megjelenítése vagy törlése a képernyőn az x,y koordinátákkal megadott 
pozícióban. Részletes ismertetésére a 12.3.1 pontban térünk ki. 
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A példában két lényeges FOR...NEXT ciklus van. Az egyik az y változó értékeit és ezzel 
együtt a 15 vonal 15 színét adja meg a LOW COL utasításban. A másik a Z léptetésre, 
ami a program kétszeri, különböző vonaltávolságokkal történő lefutását eredményezi. 
Láthatjuk, hogy a második esetben a vonalak olyan közel kerülnek egymáshoz, hogy a 
később rajzolt vonal színét felveszi néhány előző is, vagyis azok a "háttérbe" kerülnek. 


12.2.6 HI COL —- a LOW COL feloldása 


Formátum: HI COL 
Paraméterek: — 
Funkció: A LOW COL utasítás feloldása - rajzolás az eredeti színekkel 


Mielőtt ezzel az utasítással megismerkednénk, ismételjük át a LOW COL utasításról 
tanultakat. 

Mint azt a 12.2.5 pontban (LOW COL) láttuk, a HIRES-utasítással bekapcsolt grafikus 
üzemmódban minden előállított pontnak előre meghatározott színe van. A LOW COL 
beírása előtt tehát az előre beállított színekkel rajzolunk, azaz minden előállított pont a 
video-RAM-ban (grafikus-színtároló) és MC esetén még a szín-RAM-ban (szöveg-színtá- 
roló) tárolt színeket veszi fel. 

ALOW COL-nál láttuk, hogy ez a színkezelés okoz néhány problémát, de úgy látszik nincs 
ésszerűbb megoldás. 

Ahhoz, hogy a C 6564-es színlehetőségeit minél alaposabban kihasználhassuk, szükségünk 
van egy olyan utasításra, amely a 12.2.5 pontban ismertetett LOW COL hatását feloldja. 
Ez a paraméterek nélküli HI COL utasítás, amely értelemszerűen csak egy megelőző 
LOW COL-lal együtt alkalmazható. 

A következő példán keresztül talán sikerül megvilágítani az utasításpár színkezelésben 
betöltött fontos szerepét: 
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1 REM KEtEtttekkktkk 

Z REM ESH E €-OJL 

3 REM ttttdetetetétkteek 

198 REM 

118 COLUUR 9.1: REM KERETSZIN-FEKETE 

129 REM 

130 HIRES €.ú: REM FFB BEKPPCSOLASA$HTORLES (POMTSZIN5SKEKI HATTERz FEKETE. 
146 FÜR Y-4ú TO 11 

1598 FOR X-ú TŰ 3215 

166 PLOT 4. v7Xk1E.1: REM PONTSOR RAJZOLASA 

179 NEXT X: REM 328 FONT (EGY SOR? RAJZOLASA 

198 LOW COL Y41.€.8:REM POMTSZIN-FEHER (HATTER-FEKETE?3.PHAR. FFB-BEN HATASTALAN 
1598 FÜR Xx-B TŐ 319 a 

-2nA FLOT A.7k1Et8.1:REK PONTSOR RAJZOLÁSA 

2lü NEXAT A: REH 320 POHT (EGY SOR; RAJZOLASA 

z22A HI CÜL : REM VISSZAKAPCSOLAS AZ EREDETI SZIMNOSSZEALL ITASRA 

29 NEXT Yv: REM SZINYALTAS 

249 PHRUSE 5 

258 MRM:REM VISSZAKAPCSOLAÁS - SZŰVEG-IUUZEMMODRA 

268 FRIMT CHR$(1475: REH KEPERNYÜ TÖRLESE 

278 CENTRE"FIGYELJUK MEG.HOGY":FRINT:PRINT 

208. CENTRE"R. LOW COL ES HI COL" :PRINT:FEINT 

2990 CENTRE"UTASITASUK MILTEM HATASSAL" :PRIMT:FRIHT 

CENTRE"VANMAK H SZIHEKRE ES A KULÖNBEGZÜ" : FRINT:FRINT 

a CENTRESSZIMI VONALAK EGTMASRR !" 

FAUSE 18 

T 2:REM GRAFIKUS UZEHMOD EBEEKAFCSOLASA TÜRLES NELKUL 

St FÜR V-A TÓ 3 

394 FÜR X-0 TO 199 

36a PLOT vX32.X.1:PLOT v4S2t1.X.1:REM BUFPLASZELESSEGII 

5) ZLOP RAJZDOLAZR 
ZA JPONT "EGY ASZLOPÁ RAS ZL 


394 LOM COOL Yv..8:REM 2 UJ SZIN - A 3. PARAHETER FFB-BEN HETRETALAN 
4at FOR A-A TŰ 199 

419 PLÜT Yvxk 165451: PLOT TASZELé 985 17REM BPUPLASZELESSEGÜŰ 

428 REM FONTÖSZLÜF RAJZOLASRA 

434 NEXT A:REM 288 FONT (EGY OSZLOP? RHAJZOLASH 

440 HI CüL: REM RAJZOLARS AZ EREDETI SZINEKKEL 

45 NEAZT Yv: REM SZINYALTAS 

46g HAIT 198.2553:REM VARAKOZAS EGY GÜME LENTÜHRASARH 


Észrevehetjük, hogy ez a program szoros összefüggésben ál! az előzővel, így megértése 
is egyszerűbb lesz. 


Néhány szó a programról: 

A képernyőn vízszintes, majd ezeket keresztező függőleges vonalak jelennek meg. Az 
első vízszintes vonalat a 150—-170. sor rajzolja a HIRES utasításban előírt általános 
pontszínnel, a kékkel. A 180. sorban a pontok számára az Yt1 kifejezéssel új színt 
határozunk meg (a háttér továbbra is 0, azaz fekete), amely a ciklusnak megfelelően 
12-szer változik. A 220. sorban a HI COL-lal visszakapcsolunk az eredeti színösszeállítás- 
ra. A 140—230. sorokban tehát az 1—12 kódú színekkel egy-egy vízszintes vonalat (pont- 
sort) rajzolunk, váltakozva egy eredeti (kék) színű vonallal. (Próbáljuk kitalálni, mi 
történik, ha a HI COL utasítást elhagyjuk!) 

A 330. sortól kezdve függőleges vonalakat rajzolunk egymástól 16 pont távolságra egy- 
szer az általános kék színben, egyszer pedig a LOW COL-ban (180. sor) Y-nal megadott, 
váltakozó színekben. Figyeljük meg, hogy a LOW COL-lal rajzolt vonalak színe milyen 
hatással van a környező pontok színeire, valamint a már meglévő pontok színe hogy 
befolyásolja az eredeti (kék) színben megjelenő pontok színét. (A függőleges vonalakat 
a jobb láthatóság érdekében dupla szélességben ábrázoltuk. 

A következő példaprogramot tulajdonképpen a LOW COL utasításnál kellett volna ismer- 
tetnünk, de az előforduló HI COL utasítások miatt itt térünk rá: 


P. 62 
1 REM KEREK ked leeekeakik 
2 REM §FZLÖN COLE 
3 REM kttkkkkk kk tekik 
198 REM 
119 HIRES 5.6:REM GRAFIKA BEKAPCSOLASAtTTORLES (CHATTER-KEK? PONT-ZOLD 
128 LOW COL 1.5. :REM UJ SZINEK MEGADASA (HATTER-ZOLD) PONT-FEHER 
138 REM 
148 REM VIZSZINTES RAJZOLAS AZ UJ SZINEKKEL 
158 FOR A-ű TO 319 
169 PLÜTX.66.1:REM PONTOK RAJZOLÁSA 
170 NEXT A 
189 FRUSE 2 
198 LOW COOL 8.1.6 REM UJ SZIN MEGADASR (HATTER-FEHER? PONT-FEKETE 
208 REM 
219 REM TÜRLES VIZSZIMNTESEN AZ UJ SZINEKKEL 
229 FOR X-ü TD 313 
294 FLOT X.1323.8:REMH FÜNTÖK TÖRLESE 
24 NET 
299 PARUSE 2 
260 HI COL:REM EREDETI SZINOSSZEALLITAS ZISSZRKAPCSOLASA 
27 REM 
280 REM FUGGOLEGES RAJZOLAS AZ ERERETI SZINEKKELKHATTER-KEK? PONT:5ZOLD 
29a FOR Y-a TD 199 
390 PLOT 18€9.Y.1: REM PONTOK RAJZOLASA 
318 NEST Yv 
3290 MAIT 195.255:REM VARAKOZAS EGY GOMB LENYORHASARA 
Ebben a példában a LOW COL utasítást az előzőektől eltérően, a háttérszín definiálásá- 
nak szempontjából vizsgáljuk. 
Látjuk, hogy 120. és 190. sorokban a pontszín mellett a háttérszínt is módosítottuk. Ez 


lehetséges, hiszen a háttérszín — mint ahogy azt a 9.1. fejezetben az alapok ismertetésé- 
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nél már említettük — a pontszínhez hasonlóan a video-RAM-ból (grafikus színtároló) 
származik, tehát minden 8 x 8-as mátrix esetében más és más lehet. 

A második, amit ezzel a példával szemléltetünk, hogy a színek meghatározása szem- 
pontjából közömbös, hogy az adott pontot rajzolni vagy törölni fogjuk, mert mint tudjuk, 
ezt a PLOT utasításban szereplő rajzoló-üzemmód kódja határozza meg. A törlés tehát 
azt jelenti, hogy módosul a színregiszterben lévő szín. Emiatt ha az eredeti színt törléssel 
akarjuk visszaállítani, előtte a LOW COL színeket olyan értékkel kell előírnunk, amelyek 
a normál HI COL színeknek (amelyeket a HIRES utasítással írtunk elő) felelnek meg. 


12.2.7 Ellenőrző kérdések 


Mivel ebben a fejezetben egy meglehetősen komplikált témát tárgyaltunk, az ellenőrző 
kérdések is nehezebbek lesznek. Nem szabad tehát elkeseredni, ha valami nem sikerül. 
Ilyenkor olvassuk át ismét figyelmesen a vonatkozó részeket. 


1. Hogy kell inicializálni a többszínű grafikát, ha a grafikus üzemmódot még nem kap- 
csoltuk be? 


a) HIRES... 
b) HIRES. ..: MULTI... 
c) CSET 2:MULTI... 
d) CSET 2 


2. Mi az NRM utasítás hatása? 


a) Csak a grafikus üzemmód kikapcsolása. 

b) A grafika kikapcsolása és a nagy-/kisbetűs karakterkészlet bekapcsolása. 
c) A grafika kikapcsolása és a nagybetű-/grafikus jelkészlet bekapcsolása. 
d) Az eredeti színösszeállítás visszakapcsolása. 


3. ALOW COL utasítás beírása után el akarunk helyezni egy pontot a képernyőn. Mit kell 
figyelembe vennünk? 


a) Csak egy színváltás történik. 

b) Egy-egy 8 x 8-as mátrix minden pontjának színe azonos lesz. 
c) A pont háttérszíne is meg fog jelenni. 

d) A pontszín száma eggyel csökken. 
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12.3 Grafikai utasítások 


Az előző részben tárgyalt meglehetősen nehéz téma a tulajdonképpeni grafikus munka, 
a grafikai utasítások megismerésének előfeltétele volt. Ezután már kifejezetten csak 
grafikával, pontok, vonalak, körök, mezők és sok egyéb alakzat rajzolásával fogunk 
foglalkozni. Minden utasítás, amellyel munkánk során találkozni fogunk, segít bennünket 
abban, hogy saját magunknak szép grafikákat állítsunk elő. 

Lássunk hozzá és próbáljuk ki, lépjünk be ebbe az ismeretlen világba. Most lehetőségünk 
van olyan dolgokat alkotni, amiket ezelőtt még senki nem látott a képernyőn. Itt kezdődik 
a művészet, a formatervezés. A grafikával játékokat is készíthetünk, amelyhez hatékony 
segítséget nyújtanak majd a későbbiekben tárgyalt sprite utasítások. 

Röviden: rátérünk fejezetünk központi témájára, a rajzoló utasításokra. 

Az utasításoknál szereplő esetenként változó és az adott helyen ismertetett paraméterek 
mellett minden esetben alkalmazhatjuk a már ismert rajzoló-üzemmód kódot is, amit a 
továbbiakban rü-vel jelölünk. Ezzel határozhatjuk meg, hogy a figurát rajzolni, törölni 
vagy invertálni akarjuk-e. Az utasítások MULTICOLOR-ban is működnek, így az ábra 
megjelenítése terén már egész sor lehetőségünk van. 

SIMON s BASIC-ben a kép beosztása az x-y koordináták szerint értelemszerűen, a 12.2 
pontban leírtaknak megfelelően történik. 

Végül egy jótanács: Próbáljuk ki a példák nyújtotta összes lehetőséget. Nem fogjuk 
megbánni! 

Nos, sok sikert és jó szórakozást! 


12.3.! PLOT -— pont rajzolása 


Formátum: PLOT x,yrü 
Paraméterek: x — Az adott pont X-koordinátája 
MC: 0—159/FFB: 0—319 
y — A pont Y-koordínátája 
MC: 0—199/FFB: 0—199 
rü — A rajzoló üzemmód kódja (0—2) 


Funkció: A képernyőn elhelyezi (törli vagy invertálja) az X-Y koordinátájú pontot 
Példa: PLOT 160,100,1 
A képernyő (160,100) koordinátákkal meghatározott, pozíciójában egy pont 
jelenik meg. j 
b: 


A PLÖT a legegyszerűbb rajz utasítás, amellyel belépünk a grafika világába. Mindössze 
arra alkalmas, hogy a képernyőn kijelezzen ítöröljön vagy invertáljon) egy pontot, amely- 
nek helyét az X-Y koordinátákkal adjuk meg. A képzeletbeli koordináta-rendszer (0;0)- 
pontja a képernyő bal felső sarkában van. 

A rü-paraméterrel írjuk elő a pont ábrázolási módját. Értelmezése a következő: 


rü jelentése 
0 törlés 

1 rajzolás 
2 invertálás 


(Az invertálás a bekapcsolt pont kikapcsolását és a kikapcsolt pont bekapcsolását jelen- 
ti.) í 

Ez az utasítás a koordináták és az rü-paraméter változtatásával még könnyen gyakorol- 
ható, hatásuk kipróbálható. 

Végezetül töltsük be a PLOT című programot, amely egyszerre két példát is hoz az 
utasítás működésének bemutatására. 


433 


8 


63 


REM $E4ttEkkEkk 

REL SK FEE ÖVET ak 

REM titrtrktkkk 

A REM 

A HIRES 1.4:REM GRAFIKA BEKAPCSOLASF (HATTER-IBOLYA? PONT-FEHER 
0 FÜR A-1 TO 3139 STEF .5 

a PLUT -.60XSIMCA/252t199.1 

Aa NEAT a 

A FAUSE 5 

6 HIRES 1.4 :REM GRAFIKA TÖRLESE 

b FÜR vY-1 TO A STEP -1:REM 1.2 RAJZ 2.I3TORLES 
FÜR A-193 TO 298 STEP .5 

PLOT 46XSINLX/3824166.S0$SINC 4/7252 618AB.T 
NEXT A 

FRÜSE 1 

NEST Y :REM ISMET TÖRLES 

HARIT1599.255:REM VARAKOZAS GOMBENYOMASRA 


a ht ja s e ms (JJ NU 


A példa első részében egy egyszerű szinuszgörbe ábrázolásán keresztül mutatjuk be a 
PLOT működését. Érthetőbbé válik, ha néhányszor megváltoztatjuk a paramétereket! 
A program második részében (160. sortól) egy érdekes alkalmazási lehetőséggel találko- 
zunk, ami egyben az rü-paraméter hatását is szemlélteti. (Értékeit az Y-változó tárolja.) 
A 230. sorral már több helyen is találkoztunk. Rendeltetése a program megállítása, 
befejezés nélkül. Ha elhagynánk, a program végén eltűnne a grafika és visszatérne a 
szöveg-képernyő. Ezzel az utasítással azt érjük el, hogy a grafika mindaddig a képernyőn 
marad, míg egy gombot le nem nyomunk. 


12.3.2 TEST - egy pont állapotának vizsgálata 


Formátum: TEST (X,Y) 
Paraméterek: X — A pont X-koordinátája 
MC: 0—159/FFB: 0—319 
Y — A pont Y-koordinátája 
MC: 0—199/FFB: 0—199 


Funkció: Ellenőrzi, hogy az (X,Y)-koordinátákkal jelzett pont be van-e kapcsolva 


Tételezzük fel, hogy a programunk akár a PLOT, akár más utasítással a képernyőn kijelez 
egy pontot. Valamilyen okból a későbbiek során tudni szeretnénk, hogy a pont éppen 
bekapcsolt állapotban van-e (metszéspontok, ütközések, behatárolt képrészek). Ennek 
megállapítására szolgál a TEST utasítás. A pontot meghatározó (x,y)-koordinátákat egy- 
ben argumentumként értelmezzük és a TEST utasítást függvényként alkalmazzuk. 
Amennyiben a kérdéses pont bekapcsolt állapotban van, értéke 1, ellenkező esetben 0. 
Ezt a függvényértéket a későbbiekben aritmetikai kifejezésekben is felhasználhatjuk, az 
alábbiak szerint: 


A— TEST-(0,0) 
B-Bs5 -- TEST(0,10) 


Vagyis A értéke 1, ha a (0;0)-koordinátájú pont bekapcsolt állapotban van és O, ha nincs. 
A B értéke 15, ha a (0510) koordinátájú pont nincs bekapcsolva és 16 az ellenkező 
esetben. 

Az utasítás kiválóan alkalmazható játékprogramokban, ezért a szokásos példaprogra- 
mon kívül egy kis játékprogramot is készítettünk, ami kizárólag a már ismert utasítások- 
kal működik és bár rövid, mégis szórakoztató. 

Töltsük be először az 1. TEST című programot: 
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P. 64 

1 REM EtEEEPEEEKEKEK 

zt Etas Tá EE T 

3 REM FEtEREEEREEEEE 

108 REM 

118 HIRES £.7:REM GRAFIKA. EEKRFCSOLASAt TÖRLES 

120 MEETESTETGGK 198 :REM ELLENÜRZES FEKRPCSOLAS ELOTT 
134 PALSE 3 

149 FLOÜT 186. 1083.1:FREM PONT BEKAPCSULASA 

154 TesTI.STe1üm. 1087:REM ELLEMÜRZES BEKRFCOSULAS LITAN 
169 PRUSE 3 

178 NRM:REM GRAFIKA KIKAPCSOLHAER 

198 FRINT CHR$-1472:REM KEPERNYÜTÜRLES 

198 FRINT "BEKAPCSOLAS ELOTTI ALLAPÜUT:"T1 

zag FRIHT "BEKAPCSOLAS UTANI HLLAPUÚT :" T2. 


Ha áttanulmányoztuk, jöhet egy kis szórakozás: 


P. 65 


1 REM Kéttkdtktk kk kk 

ZO REN Aa UT Ez olv k 

3 REM EtEtEEEFETEETEK 

17ü REM 

146 REM kiitikttkkk 

159 REM SUFER-KIGYÜ 

169 REM Fittttétktk 

176 REM 

189 COLOUR 18.1:REM KERET VILAGOSPIROS 
198 HIRES 1.2:REM GRAFIKA BEKAPCSOLASRA (HATTER-YVORUS) PONT-FEHER 
195 NRM:PRINT"T MWFEL cziV Út 

196 PRINT" NMELE sz M" 

197 PRINT" MWMBFELRA - A" 

198 PRINT" MEMICGEBRA - DN" 

290 INPUT" MMMZEBESSEG (1-22 :";G 

295 CSETZ 5 

218 REM KEREFEEEEEEKEE KÉK klete 

229 A-—G:v-B:REM STARTIRANY EBRLRA 

238 A-16EM:B-196: REM STARTKODORDNINATAK 
248 GET A$:REM BEILLENTYII LEHIVASRA 

299 IF A$-"I" THEN 4-A:Ys-G:REM FEL 
260 IF A$-"M" THEN A-f:vző:REM LE 

z2ra IF A$-"A" THEN 4--—-G:vz-ű :REM BALREH 
280 IF A$-"D" THEN 4-G:v-B8:REM JOBBRA 
298 A-AtAX:B-BtrT:REM TÜVABBMOZGATAS 

399 IF AAA ÚR AC313 OR B-A OR E5133 THEN GüTŰ 3249 
316 IF TEST(R.B2-1 THEN GOTO 349 

Sza FLOTA.B.1 :REMH PONT ELHELYEZESE 
33A GOTO 248 

34A REM 

3598 REM Heki 

300. REM ÚU.T.-K ÖZ2ZTGE TES 

378 REM HEKEEEKEE EEEN TEK 

330 REM 

390 FOR Csi TÜ15 

409 FOR 1-1 TŰ 15 

419 COLOUR D.1:REM KERET YILLOGTATASA 
429 NEXT D 

439 NEST C 

449 Az INT(RND-É15£519/62£G 

459 Bz INTÉRHIIC12k199/62X£G 

460 LOLDUKR 14.1 

470 2zZ41:REM SZAHLALO 8 
420 IF 2-2A THEM GOTÜ 588 

45 GOTO 249 
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3900 REM 

516 REM $ikikktt 

5209 REMVEGE 

sza REM $Ekkikk 

5498 REM 

559 NRM:REM GRAFIKA KIKAPCSOLASA 

SEA PRINT CHR$(147):REM KEPERNYOTÜRLES 

574 FRINT AT(A.199"":REM KIIRZORBERLLITAS 

588 CENTRE "SEMMI PANIK!" 

598 WAIT 198.255:REM VARAKOZAS EGY GÜME LENTÜHMASARA 


A játék a következőképpen működik: 

A képernyőn megjelenik egy pont, amely a választott sebességtől függő gyorsasággal 
egy hosszú kígyóvá növekszik. Mozgását az "1", "M", "A" és "D" billentyűkkel irányíthat- 
juk. Ha a kígyó nekiütközik a képernyő szélének vagy egy másik kígyónak, vagy mozgásá- 
val éppen ellenkező irányban akarjuk mozgatni, "elpusztul". A keret villogni kezd, majd 
néhány másodperc múlva újabb kígyó jelenik meg. 20 ütközés után a játék befejeződik. 
A játék persze tovább finomítható, szépíthető. Játszhatják például ketten, a vezérlés 
történhet joystick-kal és az elért pontszám is kiíratható. A program kis búvárkodással 
könnyen megérthető és módosítható. 

Térjünk vissza azonban a TEST utasításra, hiszen most leginkább erre vagyunk kíván- 
csiak. A 310. sorban találkozunk vele. Láthatjuk, hogy az (X,Y) koordinátákat az A és 
B változók tárolják. Ha a függvény értéke 1., azaz a kérdéses pont be van kapcsolva, 
ütközés történt, a program a 340. sorban folytatódik. Ha 0, újabb pontot helyez el, azaz 
a kígyó tovább nő. 


12.3.3 LINE — egyenes rajzolása 


Formátum: LINE xt, y1, x2, y2, rü 
Paraméterek: x1 - a vonal kezdőpontjának x-koordinátája 
MC: 0—159/FFB: 0—319 
y1- A vonal kezdőpontjának y-koordinátája 
MC: 0—199/FFB: 0—199 
x2 - A vonal végpontjainak x-koordinátája 
MC: 0—-159/FFB: 0—319 
y2 - A vonal végpontjának y-koordinátája 
MC: 0-199/FFB: 0—-199 
rü — A rajzoló üzemmód kódja (0-2) 
Funkció: A megadott pontok összekötése egyenessel 
Példa: LINE 0,0,319,199,1 
Megrajzolja a képernyő egyik átlóját. 


A PLOT utasítással elméletileg bármilyen, általunk kigondolt alakzatot megrajzolhatunk. 
Gondoljuk el azonban, mennyi fáradságot és időt igényelne egy egyszerű vonal megraj- 
zolása is, ha annak minden pontját egyenként kellene megadnunk. Ráadásul BASIC-ben 
ezt csak a két pontot összekötő egyenes egyenletének felhasználásával tudnánk kiszámí- 
tani, ami nagyon hosszú ideig tartana. Ezen nehézségek kiküszöbölésére született meg 
a SIMON s BASIC egy sor olyan utasítása, amelyek kész alakzatokat (vonal, ellipszis, 
négyszög) állítanak elő. Ezek egyike a LINE-utasítás. 

A LINE módot ad arra, hogy egy egyenest egyszerűen, mindössze két végpontjának 
megadásával megrajzoltassunk (töröljünk vagy invertáljunk). Nincs is vele több gondunk, 
minden mást a SIMON ss BASIC old meg. (A későbbiek során majd tapasztalni fogjuk, 
hogy a SIMON s BASIC "alakzat-készítő" utasításai — előnyeik mellett — bizony elég 
lassúak, de mint már említettük, léteznek speciális grafikai programok, amelyek ezen a 
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téren is kielégítően működnek.) Lényegében azonban maga a grafikus program könnyen 
és gyorsan megírható a rendelkezésre álló utasításokkal. 

De térjünk vissza a LINE utasításra. Az első két paraméterrel (x1 és y1) a vonal kezdő- 
pontját határozzuk meg, míg a második két paraméter (x2 és y2) a végpontot jelöli. 
A sorrend nem lényegtelen, mert ha pl. az előzőekben megrajzolt vonalat törölni akarjuk 
és a koordinátákat fordított sorrendben adjuk be, előfordulhat, hogy a vonal nem tűnik 
el teljesen. Ha betöltjük az 1. LINE című programot, megfigyelhetjük ezt a jelenséget. 


P. 66 
1 REM $£EEEtEFEKEKE 


2 REt XX teebL TNE SG 

3 REM $tt4ktkkkkkkkkj 

168 REM 

1198 HIRES 2. 3:REMH GRAFIKA BEKHPECSOLASA 
120 FÜR I5s1 TŰZ 

128 REM 

1d4ú REM TEN EKHREK 

158 REM $ d 

188 REM 

178 REM 

188 FOR s-1 Tü i16g STEP 4 

198 LINE B... dő$5IMCs-2f2 41059. 1 
ZA NET XX 7 

zi IF IC51 THEN GÜüTÜ 348 

zz2a PALZE Z 


238 REN 

24A RIM HERKEKRERKEEHKE EK 

za REM $ RÖSSZ TÖRLES 

268 REM kitkekeee esése ek ük 

278 REM 

zet FRUSE 3 

2 FÜR A-1 Tü 169 STEF 4 

H HÉT is ,. 40XSIN( 5/7225 t106 9.8, ú:REM A KOORDINATAK SÜRRENNJE ROSSZ ! 
szü PALISE 19 

338 NEXT I 


368 REM tektetükteetekíktek 

s7rű REM k JÚ TÜRLES 3 Hi 

288 REM ttttktktkkk kk 

398 REM 

408 FOR X-1 TŰ 169 STEF 4 

420 MERT? A.A. x, 4045INCX/28974100,8:REM A KOORDINATAK SORRENDJE HELYES ! 
42 s, 

4530 MHAIT1S3. 255 


Az eredeti német nyelvű könyvben itt más példa szerepel, de mivel a "rossz" program 
is jól működött, azaz a vonalat teljesen kitörölte, készítettünk egy olyan programot, ami 
a teírtakat megfelelően szemlélteti. Ehhez felhasználtuk a könyv következő példaprog- 
ramját. (A magyar változat készítőinek megjegyzése.) 

A programhoz nincs sok hozzáfűzni valónk. Láthatjuk, hogy ha a törléskor megváltoztat- 
juk a koordináták sorrendjét, a rajzból egy egész jelentős rész megmarad, míg azonos 
sorrend esetén a teljes ábra eltűnik. 

Mindez az invertálásra is érvényes. 

A LINE utasítással nagyon szép hatások érhetők el, amelyekből a következő példán 
mutatunk be néhányat. 
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67 
REM HEtEKEVKEKKEKEK 


gram F 


134 REM 

148 REM $E44EFKFEKEK 
150 REM 1. AERR 
168 REM tEtttErEREK 


Sá 

3 ? d TEL STEP A 

20 LIME 8,B.K. 4843 :INCX/20IT1ÜM, 1 
218 MET A 


299 HIRES 4.1 
249 FEM 
258 REM titttektektek 


299310 3 


24160 
3ű fszt (499199 
349 LINE A.E.C.D.1 
359 NET A 
368 FHUSE 19 
378 HIRES 8.3 
38m REM 
3aA REM Meeke 
4aa8 REM 


428 FOR Xz1 TO 319 STEP 4 


Iz 
4 a LIHE éj E, 
49 MEAT A 
498 WAIT 188£.2559:REM VARAKOZAS EGY GÜME LEMHTOMRSARA 

Láthatjuk, hogy a koordinátákat bonyolult kifejezésekkel is megadhatjuk. A példában 
szereplőket nem fontos megértenünk, hiszen úgyis könnyen változtathatók. A legkisebb 
módosítás is befolyásolja a megjelenített rajzolatot. Idővel— különösen, ha a matematiká- 
ját is értjük — már a grafika tervezése is sikerülni fog. (Pl. az első alakzatot úgy készítet- 
tük, hogy egy szinuszgörbe minden pontját összekötöttük a (0;0)-ponttal). 
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nrervaa tear áée [ti 


2 GT HAKVVA 
OKAT 


Mászás ESZEBE 


12.3.4 REC - téglalap rajzolása 


Formátum: REC x,y,b,h,rü 
Paraméterek: x — a téglalap bal felső sarkának x-koordinátája 
MC: 0—159/FFB: 0—319 
y — a téglalap bal felső sarkának y-koordinátája 
MC: 0—199/FFB: 0—199 
b -— a téglalap szélessége 
MC: 0—159/FFB: 0—-319 
h -— a téglalap magassága 
MC: 0—199/FFB: 0—199 
rü — a rajzoló üzemmód kódja (0—2) 
Funkció: Egy téglalap rajzolása 
Példa: REC 20, 40, 100, 50, 1 
Rajzol a képernyőn egy 100 pont széles, 50 pont magas téglalapot, amely- 
nek bal felső sarka a képernyő (20;40)-pontjában van. 


Egy további utasítás, amellyel kész alakzatot rajzolhatunk, a REC. Segítségével a képer- 
nyő tetszőleges helyén egy tetszőleges nagyságú téglalapot jeleníthetünk meg. Lehetővé 
válik pl. grafikák készítése a képernyő egy adott területére, vagy szöveg beírása a 
grafikába, oszlopdiagramok és más hasonló alakzatok készítése. 

A téglalap helyzetét bal felső sarkának koordinátáival adjuk meg. Ez a pont egyben 
meghatározza a téglalap kiterjedését balra és felfelé. Lefelé és jobbra a két második 
paraméter a meghatározó. 


A REC 0,0,310,199,1 


utasítással a teljes képmezőt bekeretezhetjük. 
Ügyelni kell arra, hogy csak olyan szélesség- és magasság-értékeket adhatunk be, 
amelyekkel a képmezőből nem lépünk ki. Helytelen például az alábbi utasítás: 


REC 100, 150, 50, 80,1 


Ha kipróbáljuk, láthatjuk, hogy a téglalap jobb oldala csak a képernyő széléig rajzolódik 

meg, míg a bal oldala felfelé túlnyúlik a kezdőponton. (Az utasítást természetesen csak 

úgy tudjuk kipróbálni, ha előtte HIRES-sel grafikus üzemmódra kapcsolunk és utána 

WAIT-tel megakadályozzuk a kép eltűnését.) 

Ugyanez fordul elő, ha a szélességet választjuk meg helytelenül. 

A következő példaprogramok bemutatnak néhány tippet és trükköt a REC utasítás alkal- 

mazására. 

Először azt mutatjuk be, hogy miképpen lehetséges a keretet egy pontnyinál szélesebbre 

rajzolni. A program 120. sorában a többi paraméterrel együtt határozzuk meg a keretvas- 
" tagságot (DI), amelynek megrajzolása a 200. sorban kezdődő alprogramban történik. Ezt 

a rutint más programokba is beépíthetjük. 139 


P. 
1 REM sédekelöketetetekíök 
2 REM $1.REC Rk 


199 REM §£ VALTOZÚ KERETVASTAGSAG £, 
119 HIRES 1.8 

129 DI-3:4-198:V-5A : £-90 : H-S8:REM BEVITELI PARAMETEREK 
1340 GOSUB 2909  :REM ALPROGRAM HIVASA 
143 WAIT 198.255 

159 END 

169 REM 

170 REM sköedétetedekikik 

188 REM ALPROGRAM 

198 REM degekdekteteakik 

298 FOR 2-9 TO DI-1 

219 REC XtZ, v4Z, B-2§2 , 29-22, 1 

228 NEXT Z 

238 RETURN 


Próbálgassuk a programot a paraméterek változtatásával. 
Végül bemutatunk néhány, a REC utasítást felhasználó grafikát: 
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1 REM kek ter 

2 REM $2.REC § 

3 REM tiétek tedekksk 

188 REM 

119 REM deékkdkktékekük 

129 REM 1. ABRA 

138 REM $ékiekökktekt 

149 HIRES 3.4 

1598 FOR X-i TA 99 STEP 2 
168 REC X.ArAAs1 

178 NEXT X 

199 PAUSE 19 

199 HIRES 3.4 

298 REM 

210 REM dekdekdekkíkkik 

22 REM — 2.ABRA 

230 REM Netkdetetemáekik 

240 REM 

258 FOR X-1 TO 299 STEP 3 
268 A-x 

270 PR-6OXSIM(X/9924198 
28ú C-ABS(B/42419 

298 D-C 

390 REC A.B.C.D.1 

318 NEXT A 

329 PAUSE 19 

339 HIRES 3.4 

348 REM 

359 REM sekdekköktekkk 

36A REM 3. ABRA 

379 REM kitkkkkkkmkik 

380 REM 

399 FOR X-1 TO 298 STEP 2 
490 A-X 

418 B-ERXSIN(X/282450 
429 C-ABS(3OXSINCA2B 2 
4938 D-Ck2 

44A REC A.B.C.D.1 

458 NEAT X 

4690 WAIT 198.255:REM VARAKOZAS EGY GOMB LENYOMASARA 


Ne ijedjünk meg a sok bonyolult számítástól, nem szükséges mindet megérteni. A prog- 
ramok önmagukért beszélnek. 
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12.3.5 BLOCK - mező rajzolása 


Formátum: BLOCK xt, y1, x2, y2, rü 
Paraméterek: x1 — A mező bal felső sarkának x-koordinátája 
MC: 0—159/FFB: 0—319 
y1- A mező bal felső sarkának y-koordinátája 
MC: 0-199/FFB: 0—199 
x2 - A mező jobb alsó sarkának x-koordinátája 
MC: 0—159/FFB: 0—319 
y2 — A mező jobb alsó sarkának y-koordinátája 
MC: 0—199/FFB: 0—-199 
rü — A rajzoló üzemmód kódja (0-2) 
Funkció: Téglalap alakú, kitöltött mező rajzolása 
Példa: BLOCK 100,150,160,200,1 


Tételezzük fel, hogy egy statisztikai programot szeretnénk készíteni, amelyben oszlop- 
diagramokat is rajzolni akarunk. Ezt a REC utasítással megoldhatjuk ugyan, ahogy azt 
az elsö példaprogramunkban láttuk (addig növelve a keretvastagságot, míg a téglalap 
két oldala össze nem ér, de képzeljük el, hogy ez mennyi időt igényel). Ráadásul még 
egy szubrutint is írnunk kell, ami viszont a tárolóból vesz el helyet. Röviden tehát, 
szükségünk van egy olyan utasításra, amely néhány paraméter megadásával képes egy 
kitöltött téglalapot a képernyőre rajzolni. Ezeknek a követelményeknek az ún. BLOCK 
utasítás felel meg. (A későbbiekben látni fogjuk, hogy még egy harmadik lehetőségünk 
is van. Nevezetesen a REC és a PAINT utasítások kombinációja, de ez is meglehetősen 
időigényes és nehézkes.) 

A BLOCK utasítás kezelése nagyon egyszerű. Meghatározzuk az adott mező nagyságát 
és elhelyezzük a koordináta-rendszerben, azaz megadjuk bal felső és jobb alsó sarkai- 
nak x- és y-koordinátáit. 


Figyelem! Mivel a REC és a BLOCK utasítás 3. és 4. paraméterének jelentése eltérő, 
együttes alkalmazásukkor ez némi nehézséget okozhat. Ne felejtkezzünk el róla! 
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Mint mindig, az ötödik paraméter az üzemmód kódja, amivel a rajz megjelenési formáját 
írjuk elő. 

Itt kell még bemutatnunk a BLOCK utasítás egyik jellegzetességét. Nevezetesen, ha a 
rajzolandó mező színét a LOW COL-lal akarjuk meghatározni, nem járunk sikerrel. Ezt 
az utasítást ugyanis a BLOCK figyelmen kívül hagyja. Csak a HIRES-ben eredetileg 
meghatározott színekkel rajzol. Amennyiben ragaszkodunk a színváltáshoz, kénytelenek 
vagyunk mégis a már említett. REC szubrutinnál maradni. Ettől eltekintve a BLOCK 
lehetővé teszi számunkra, hogy gyorsan és elegánsan jeleníthessünk meg a képernyőn 
különböző színes mezőket. 


A következő program néhány alkalmazási lehetőséget mutat be. 
Az első részben arra láttunk példát, hogy a REC utasítással egyszer előállított, vastagon 
keretezett mezőt a BLOCK-kal is megrajzolhatjuk. 
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1 REM séteetéetetere tetek 

2 RFEMXEPELNÜCK ö$ 

3 REM EttEdktk kékes 

140 REM 

118 REM KEREKEK ETEENEKE Ők 

128 REM KZESRVEGT 

139 REM $ekkkekekkekeekküe 

143 REM 

1590 HIRES 7. :REM GRAFIKA BEKAPCSOLASA 

1EG BLOCK 118, 60.229, 129. 1:REM KULSO HEZO RAJZOLASA 
178 ELOCK 129.,78.219.119.0:REM BELSC MEZÜü TÖRLESE 
189 FAUSE 19 5 


REM 
ZAB REM $ekdededegetetesteseesk tesok tele kelek kk 
218 REM INYERTALRS 
228 REM Miedegededete temetesere edett de teedeesk ik 
230 REM 
2490 HIRES7.0:REM GRAFIKA TÜRLESE 
250 FOR X-1 TŰ 288 STEP 29 
260 BLOCK X.50.X£1.2., I190£SINCK/302-450.2:REM BLOCK INYVER "ALASR 
278 NEXT X:REM KÖVETKEZO ELOCK 
289 PAUSE 19 
290 REM 
398 REM Heleketeteteteretereéák ak zak tedeesk jeskakak 
318 REM MPE EEG ER 
328 REM Mesesktegedegeretteítedésk ak kese e lestek ak 
2339 REM 
348 HIRES7.6§ 
359 COLOUR 2.£t:REM (HATTER-FEKETE? KERET-PIROS " 
369 MULTI 3.4.5:REM MULTICOLOR BEKAPCSOLASA 
37a ELOCK 5.29. 158, 1998.,1:REM 1.SZIN 
38Aa BLOCK 45.76.,158.198,2:REM 2.SZIN 
399 BLOCK 85. 129a,159.198.3:REM 3.SZIN 
499 BLOCK 28.50. 199, 158.4:REM INYERTALAS 
418 WAIT 198.255:REM VARAKOZAS EGY 6OMB LENYOMASARA 


12.3.6 CIRCLE — ellipszis rajzolása 


Formátum: CIRCLE mx, my, rx, ry, rü 
Paraméterek: mx — Az ellipszis (kör) középpontjának x-koordinátája 
MC: 0—159/FFB: 0—319 
my — Az ellipszis (kör) középpontjának y-koordinátája 
MC: 0—199/FFB: 0—199 
rx — Az ellipszis x-irányú sugarának hossza (pontokban) 
ry — Az ellipszis y-irányú sugarának hossza (pontokban) 


142 rü — A rajzoló üzemmód kódja 


Funkció: Ellipszis (kör) rajzolása 
Példa: CIRCLE 150,80,60,30,1 


Már eddig is elcsodálkozhattunk azon, hogy a.SIMON ss BASIC mi mindenre képes. Most 
is egy olyan utasítással fogunk megismerkedni, ami rengeteg munkától kímélhet meg 
bennünket, valamint hozzásegít ahhoz, hogy igényes grafikákat készíthessünk. 

Ezzel az utasítással a jövőben számtalan kört és ellipszist varázsolhatunk a képernyőre, 
különösebb fáradság nélkül. Azáltal, hogy néhány paramétert közlünk a számítógéppel, 
máris meghatároztuk az alakjukat. 

Ejtsünk most néhány szót az ebben az összefüggésben szükséges geometriai alapokról. 
Több módszer is ismert, amellyel egy ellipszist definiálhatunk. SIMON s BASIC-ben a 
középpontos ábrázolást alkalmazzuk, azaz minden ellipszishez elsősorban megadjuk 
annak középpontját. Ez felezi az ellipszis két szemközti pontjának távolságát. A közép- 
pont és az ellipszis egy pontjának távolsága az ellipszis sugara. Ezek közül kettőnek, a 
vízszintes és a függőleges sugárnak kitüntetett szerepe van. Ezek határozzák meg 
ugyanis az ellipszis alakját. Valódi ellipszis esetén ezek különböző hosszúságúak. A kör 
egy speciális ellipszis, amelynek függőleges és vízszintes sugara azonos hosszúságú és 
ezáltal az összes pontja azonos távolságra van a középpontjától. 

Nos, a CIRCLE utasítás az ellipszis ezen tulajdonságaira épülve működik. 
Mindenekelőtt meg kell adnunk az ellipszis középpontjának koordinátáit (mx, my), majd 
az rx- és ry-sugarakkal meghatározzuk a nagyságát és az alakját. Már csak az üzemmód 
(rü) előírása van hátra és máris kezdhetjük a rajzolást. 

Ha kört akarunk rajzolni, nem mindegy, hogy a számítógép FFB vagy MC üzemmódban 
van-e. Előző esetben elegendő, ha a két sugarat (rx és ry) azonos nagyságúra választjuk, 
míg MC-ben szem előtt kell tartani, hogy a felbontóképesség x-irányban a felére csök- 
kent. Ezáltal a kör x-irányú sugara pontokban megadva, az y-irányúnak csak a fele lesz. 
(rx — 1/2 ry). Köztudott, hogy minden tv-készülék torzít egy kicsit. Ettől vagy eltekintünk, 
vagy a képernyőn történő közvetlen méréssel megállapítjuk a korrekciós tényezőt. Ebben 
az esetben nincs szükségünk a SIMON s BASIC kézikönyv vonatkozó adataira. 

Ha olyan kört akarunk rajzolni, amely kis mértékben túlnyúlik a képernyőn, akkor az a 
legegyszerűbb, ha a legutolsó látható pontot egy egyenessel összekötjük a legelső, újból 
megjelenő ponttal. Nagy kiterjedés esetén kisebb-nagyobb káosz keletkezhet. 

A CIRCLE utasítás alkalmazását két példán mutatjuk be. Először egy kis gyakorlóprog- 
ram, amely segíti az utasítás megértését. A beadandó paramétereket jól láthatóan 
megjelöltük a felettük lévő REM-sorokkal. Többszöri változtatásukkal figyeljük meg, mi 
történik: 
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P. 71 


1 REM HEREREKEEEEKEKK KK 

2 REM ek 1-C T RG 4 EK 

3 REM EkrKEKEKkkk kk 

199 REM 

110 HIRES 7.8: REM GRAFIKA BEKAPCSOLASA 
129 REM GYAKORLO PELDA 

159 REM MODOSITSUK FH PARAMETEREKET ! 
149 REM 

150 REM MMX! My! RX! RY!ZM 

169 REM sees ez sgázázát TÉR Í ST By 

179 REM ! ! ! ! 

189 CIRCLE 169.109. 74, 98,1 

ESOGSREM VEGAS zata lás ét Egesz kát tt 

200 HAIT 198.255:REM VARAKUZAS EGY GOMB LENYOMASARA 
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1 RET Flettlesedeteee eke etek 

4 REN ZS R 6-E Ek 

3 REM $ieteteekekktekk tk kekk 

108 REM 

119 REM Hetet kok 

129 REM TÖLCSER 

128 REM $ikkkkkkkkekk 

140 REM 

150 HIRES 3.2:REM GRAFIKA BEKRPCSOLASA 

169 COLDOUK 2.2:REM KERET ES HATTER PIROS 

170 FOR 5-1 Tú 99 STEP 2 

180 CIRCLE At1A,A4IH.X. A 1 

198 NEZT A 

20 FPAUSE 19 

210 REM " 

22a REM tittktkkkkkk kik 

238 REM - HAVASI KURT 

240 REM tikkkteekkkeeeüksk 

259a REM 

260 HIRES 342 

27B FOR A-1 TŰ 119 STEP 2 

288 CIRCLE 1.3£A419.S50£SINCXZ/SAT ZD HEHPLO, AZZTR B HZ 1 

299 NEMT X 3 

399 LINE í154.185.278,50.1 

318 LIME 138.110.28Mű. 189. 1 

329 LINE 128.115.270.158.1 

338 PALI;E 18 

341 REM 

5598 REM KEttkEktEF 8 

269 REM KAGYLO 

378 REM 4tt4Etkdtkk 

3860 REM 

399 HIRES 3.2 

400 COLOUR 12.12:REM HATTER EZ KERET 2.SZURKE 

419 MULTI 6€.7.7:REM ATVALTAS HULTICOLUR—RR 

420 FOR Az1 TO 78 STEP 2 

439 T-T4t1:REM SZINREGI ZTER VALTAS 

448 LON COOL F.F41.F42: ölsz IHVALTAS 

420 CIFCLE 28. A.92E5HIB 
z3 THEH T-g:Fs Fiz 


Fs1G THEM FzG:REM SZINYALTAS 


489 PAUSE 18 
499 PEN 
500 REM fökteeketeetktk 


528 REM KEREEHEKEKKEHEKE E 
5538 REM 
548 FÜR A-ű TÜ 1 


ín 
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598 CÜLŐOUKR At 
560 FALISE 5 
9ra NEXT X 


m:REM VARAKOZAS EGY GOME LEHYOMAZARA 

A 2. program öetkátall kissé sokáig tart, de legyünk türelemmel. A SIMON s BASIC 
CIRCLE utasítása nem olyan gyors, mint más grafikus programok (pl. SUPERGRAPHIK), 
de azért sok örömet szerezhet. 


12.3.7 ARC - ellipszisív rajzolása b 
Formátum: ARC mx, my, ik, iv, t, rx, ry, rü 
Paraméterek: mx — A teljes ellipszis középpontjának x-koordinátája 
MC: 0—159/FFB: 0—319 
my - A teljes ellipszis középpontjának y-koordinátája 
MC: 0—199/FFB: 0—199 
ik — Az ív kezdőpontjának szöge (0—360") 
iv — Az ív végpontjának szöge (0—-360") 
t — Két szomszédos számított pont távolsága szögben kifejezve (0—360") 
rx — Az ellipszis vízszintes sugara 
MC: 0—159/FFB: 0—319 
ry — Az ellipszis függőleges sugara 
MC: 0-199/FFB: 0—199 
rü — A rajzoló üzemmód kódja (0—2) 
Funkció: Ellipszis- vagy körív rajzolása 
Példa: ARC 160,100,20,120,20,50,40,1 


A CIRCLE mellett még két olyan utasítással foglalkozunk, amelyek az ellipszissel vannak 
kapcsolatban. Ezek közül az első az ARC utasítás, amely az ellipszisnek csak egy Ívét 
rajzolja meg. Ahogy létezik a félkör, negyedkör fogalma, ugyanúgy létezik a fél-, negyed-, 
nyolcad-, . . . stb. ellipszis fogalma is. Ugyanakkor ennek az utasításnak még egy jellegze- 
tessége van, de erről majd később lesz szó. 

Először is: Mire van szükségünk ahhoz, hogy egy ívet megrajzolhassunk? Mindenekelőtt 
tudnunk kell azt, hogy melyik az az ellipszis, amelynek egy ívét ki akarjuk rajzolni. 
Szükségünk van tehát azokra a paraméterekre, amelyek az ellipszist egyértelműen 
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meghatározzák. Ezeket a CIRCLE utasításnál már ismertettük: mx, my a középpont 
koordinátái, valamint rx és ry az ellipszis sugarai. A paramétereket a formátum szerint 
helyezzük el az utasításban. 

Emellett szükségünk van még az ív hosszának meghatározására is. Mint tudjuk, minden 
kör (és természetesen minden ellipszis) 360 fokra osztható. SIMON" s BASIC-ben az 
ellipszis legfelső pontja jelenti a O (azaz a 0") pontot. Ettől kezdve az óramutatóval 
egyirányba mérjük fel a 360 fokot, amelynek végén visszajutunk a kiindulási pontba. 
Amikor tehát egy ív hosszát akarjuk meghatározni, meg kell adnunk azt a szöget, ahol 
kezdődik (ik) és ahol végződik (iv). Fél ellipszist kapunk például az ik— 0 és az iv— 180 
paraméterértékekkel. A következő ábra a fokbeosztást szemlélteti: 


315 45 
270 " 90 
225 135 


Ezzel tulajdonképpen mindent megadtunk, ami az ellipszisív megrajzolásához szüksé- 
ges. A SIMON s BASIC azonban továbbmegy. Meg kell adnunk még a t paramétert is. 
Jelentését az alábbiakban magyarázzuk. 

Logikus, hogy egy ellipszis megrajzolásához egy csomó pont helyét kell meghatározni. 
Normál esetben az SIMON ss BASIC ezt úgy csinálja, hogy az egymástól megfelelően kis 
távolságra lévő pontok helyét kiszámítja, majd a szomszédos pontokat egy egyenessel 
összeköti. Végeredményként egy összefüggő képet kapunk. CIRCLE esetében ezt a 
távolságot eleve meghatározták és akkorára választották, hogy mind a felbontás, mind 
pedig a rajzolási sebesség elfogadható legyen. Minél nagyobb ugyanis a pontok közti 
távolság, annál szögletesebb az ellipszis és minél több pont pozícióját kell! kiszámítani, 
annál lassúbb a rajzolás. Valójában egy sokszöget rajzolunk, amely megfelelően kis 
ponttávolság esetén ellipszisnek látszik. 

Az ARC utasítás megengedi, hogy ezt a távolságot, vagyis a felbontás szögét tetszés 
szerint megválaszthassuk, amiből az következik, hogy vele sokszöget is rajzolhatunk. 
Egy normál, CIRCLE utasítással rajzolt ellipszisnél a t paraméter (azaz a szomszédos 
pontok szögben kifejezett távolsága) 12. 

Az ellipszis kiszámított pontjai tehát 0, 12, 24... stb. foknál vannak. A két alábbi utasítás 
emiatt azonos eredményt ad: 

- ARC 160,100,0,360,12,50,70,1 
— CIRCLE 160,100, 50,70,1 


Ennek megfelelően különböző sokszögeket rajzolhatunk, amelyben a következő táblázat 
segítségünkre lehet: 


a sokszög 


120 háromszög 
90 négyszög 
72 ötszög 
60 hatszög 
51 hétszög 


45 nyolcszög 
40 kilencszög 
36 tízszög 


A táblázatból kiválasztható a rajzolni kívánt sokszöghöz tartozó t paraméter. Ha teljes 
egészében meg akarjuk rajzolni, akkor ik— 0, iv— 360 legyen. 
Nos, most már mindent tudunk ahhoz, hogy a gyakorlóprogramot kipróbáljuk: 
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P. 73 9 


1 REM deeteetetéések 
2 PEM$ILARC 

3 PEM edett 

aa REM : 

18 HIRES7.8:REM GFARFIKA BEKAPCSOLASA 

ZA REM GYAKORLÚ PELDA 

38 REM VALTOZTASSUK A PARAMETEREKET ! 

148 REM 

159 REM MX! MY! 84! EM) A! RXI RYIZM 

160 REM ————— ese ee mee mm esem me 

179 REM ! ! ! ! ! ! ! 

189 ARCIGO, 190. A/Z6A. 45. 70, SB. 1 

1980 REM —-——— ese eme een enem mmm ene 

200 WAIT 1985255:REM VARAKOZAS EGY GOMB LENYOMASARA 


REM det ebek deedesk 

REM $Z2Z.ARC 4 

REM Hddöktgtekkékk 

REM 

REM Ettttktrtkb 

"REM 1. HAEBRA 

REM köttettek 

REM 

HIRES 3.29: REM GRAFIKA BEKAPCSOLASR 
166 COLOUR 3.3:REM KERET-BARNA 

í78 FOR 5z1 TO 98 STEP 2 

159 ARC STI. XATIA. XA. ZERTIRD XA 1 
199 NIXST A 

zag FALSE 19 

210 REM 

228 REM Xtkkdetelekkik 

238 REM 2. ABRA 

2461 REM $dedeteteteakkkek 

zat REM 


0 A LUI ED 
DD a 


REM sededésete tése seséstők 
REM 2. RERR 
REM ktrtkttkkkk 
REM 

HIRES 3.9 
ZOLOUR 12.12:REM HATTER ES A KERET 2-ES SZURKE 
MULTI 6.7.7:REM MC BEKAPCSOLASA 

St FUOK-ASI TO 78 STEP 2 

T5Tt1:REM SZINREGISZTER VALTAS 

LÜM COOL. F.F4t1.Ft2:REN SZINYALTAS 

a ARC Sa. , 92XXT1R. SARA, Z7BTX ERNI XT e 


39 MNEXT A 
449 PALSES 


46A REM kelek tekkeegekeksktek 
47A REM — VILLOGTATAS 
47 REM tejbe eeeesek 


TÁSLS 
1 :kREM HATTER- ES KERETSZIM VALTRS 


540 COLOUR § 
S50 HHIT 198, 


FE 
Z 


8 kel 


na: REM VARAKOZAS EGY GOPÍB LENYÜMRASARRB 


X/38-.294X-4 18, 19045, 2OHA , AZZTASBI AZ 21 


IF T53 THENT-B:F-F-4H3:IF F-16 THEN F-A:REM SZINKOD VALTÜUZTRTAS 
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Csodálatos, mi mindenre képes ez a kis utasítás! 


12.3.8 ANGL - az ellipszis sugarának megrajzolása 
Formátum:  ANGL mx, my, sz, rx, ry, rü 
Paraméterek: mx - Az ellipszis középpontjának x-koordinátája 
MC: 0—-159 / FFB: 0-319 
my - Az ellipszis középpontjának y-koordinátája 
MC: 0—199 / FFB: 0—199 
sz — A rajzolandó és az v-irányú sugár által bezárt szög (0—360") 
rx — Az ellipszis x-irányú sugara 
MC: 0-159 / FFB: 0—319 
ry — Az ellipszis y-irányú sugara 
MC: 0-199 / FFB: 0—199 
rü — Üzemmód kódja (0-2) 
Funkció: Az ellipszis adott szöget bezáró sugarának megrajzolása 
Példa: ANGL 160,100,20,60,70,1 
Az ANGL a már említett második utasítás az ellipszis témakörében. Nézzük, mire is 
használhatjuk. 
Segítségével megrajzolhatjuk egy tetszőleges ellipszis bármely sugarát anélkül, hogy 
magát az ellipszist megrajzolnánk. 
Ugyanúgy, mint az ARC utasításnál, itt is legelőször azokat a paramétereket kell megad- 
nunk, amelyek az ellipszist egyértelműen meghatározzák. Ezek, a már ismert módon, az 
ellipszis középpontjának sebességái (mx, my) és az x-y irányú sugarak (rx, ry). De ezt 
már nem kell részleteznünk. j 
A továbbiakban meg kell még valahogyan határoznunk, hogy melyik sugarat akarjuk 
kirajzoltatni. Ezt szintén az ARC utasításban leírtak szerint, a 0 pont és a sugár végpontjá- 
nak szögértékben kifejezett távolságával adhatjuk meg (sz). Egyszerűen beadjuk tehát 
a végpont pozícióját, amit azután a számítógép összeköt az ellipszis középpontjával és 
máris kirajzolódott a keresett sugár. Ez minden, amit tennünk kell. 
Nincs még egy ilyen csodálatos hatásokat eredményező utasítás. Rajzolhatjuk, pl. az 
ellipszist és a neki megfelelő valamilyen sokszöget váltakozva... stb. Az utasítás titkát 
csak próbálgatás útján fejthetjük meg. 
Mint már tapasztaltuk, a gyakorlóprogramon tanulmányozhatjuk az egyes paraméterek 
hatását. Az ANGL utasítás azonban elsősorban bonyolult alakzatok rajzolására alkalmaz- 
ható, mint ahogy azt a 2. példaprogramunkon keresztül be is bizonyítjuk. Azt is észre kell 
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vennünk, hogy egyszerűen nem kerülhetjük el a FOR...NEXT ciklusok alkalmazását. 
Kísérletezzünk ezen a területen is! 
P. 75 


1 REM EEEREEEEEKEEE 
2 REM € 1.AN GIL 
3 REM KEPEKEEEEETTEK 


190 REM 

118 HIRES 7.8:REM GRAFIKA BEKARCSOLASA 

120 REM GYAKORLO FPELIR 

139 REM VALTUZTAZZUK A FARAMETEREKET ! 

140 REM 

159 REM  MXI MY! UM! RXI! RYI ZH 

160 REM ————60— ere seem né ee szem mene eene 

176 REM ! ! ! ! 1 

"99 ANGL 1EG.190. 45, 7. Aa. 1 

199 REM  ———————— see e mee k 
268 MRIT 198.255:REM VARAKOZAS EGY GOME LENYOMASARA 
P. 76 

1 REM EEEFERESEEKEK 

2 REM X x 

3 REM KEKEEEEEEEEEK 

163 REM 

118 REM EEEEKEESEKK 

128 REM 1. AERR 

130 REM KEEEFEKKKEK 


REM 

HIRES 7.§:REM GRAFIKP BEKAPCSOLASA 
FOR /-1 TŰ 140 STEP 2 

ANGOL. Arts As 1 


a NHEZT A 


REM dekekkkéskgesek 

REH LOHEPRE 

REM dette ekekk ik 

REM 

HIRES 7.8: REM GRAFIKA TOÖRLESE 
FOR Az1i TŰ ZE8 STEP 2 
AZ-40XSIHÁ A 19-. 52449 

ANSL 168. 199.X.A.A.1 

NEAT A 

PALUSE 19 

REM 

REM kttrtEkFEFEEK 

REM 2. ABRA 

REM etedettktetetb 

REM 

HIRES 7.2:REM GRAFIKA TÜRLESE 
FOR Az1 TO 490 STEP 2 
MA-SOXSIN(CA/6094109 
MY-OOKSIM( 749947 

H-A/2 

RAZZOYSIN( X/202439 
RYz39XSINCX/399-433 

ANGL MALMY.W.RX.RV.1 

NEXT x 

REM 

REM NEEE KENETET 

REM MARGARETR 

REM dededesk de eseaese essek 

REPi 

HIRES 7.8:REM GRAFIKA TORLESE 
FOR vzg TO 31 

T-ABS(T-1í1 

FOR Xs1 TO 28 

ANGL 160. 1898. A4VK11, AB, KKOST 
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539 NEXT X 

549 NEZT Y 

559 WAIT 198.255 
Ugye milyen egyszerű ezeknek a szép rajzoknak az elkészítése! Talán nincs is még egy 
olyan utasítás (kivéve talán a következőt), ami ennyi mindenttud. Győződjünk meg róla! 


12.3.9 PAINT - az alakzat "kifestése" 


Formátum: — PAINT x,y.rü 
Paraméterek: x - a hivatkozási pont x-koordinátája 
MC: 0—159 / FFB: 0—319 
y - a hivatkozási pont y-koordinátája 
MC: 0-199 / FFB: 0—-199 
rü — üzemmód kódja (0-2) 
Funkció: Egy tetszőleges alakú, zárt felület "kifestése" 
Példa: PAINT 100,120,1 


Ebben a fejezetben utolsóként a PAINT utasítással ismerkedünk meg. A SIMON ss BASIC 
kifejlesztője ezzel az utasítással egy nagyon remek dolgot alkotott! 

Tételezzük fel, hogy a CIRCLE utasítással megrajzolt ellipszist (vagy egyéb más zárt 
alakzatot) szeretnénk "kiszínezni". A következőképpen kell eljárnunk: először is meg kell 
rajzolnunk a képernyőn a szóban forgó alakzat körvonalát. Vigyázzunk arra, hogy ennek 
teljesen zártnak kell lennie, sehol sem szakítható meg. Ezután határozzunk meg az 
alakzat belsejében egy pontot (hivatkozási pont), és ennek x-y koordinátáit írjuk be az 
utasításba. Ha az üzemmódot is előírtuk, a többi már megy magától. A PAINT felismeri 
a körvonal pontjait és az alakzatot teljesen kitölti ("kiszínezi"). 

A "színezés" ellentéte a törlés, ami hasonló módon történik. Az utasítás a "nem színe- 
zett" pontokat tekinti kereinek és minden pontot töröl, ami ezen belülre esik (a keret 
ponijait is beleértve). 

Természetesen a hivatkozási pontot a körvonalon kívül is meghatározhatjuk. Ebben az 
esetben az utasítás az egész képernyőt "kiszínezi", kivéve magát az alakzatot. 

Az utasítás néha megmagyarázhatatlan dolgokat is "művei!" , főleg invertálás üzemmód- 
ban (rü— 2). Ki lehet próbálni, de alkalmazásának nincs értelme. 

Időnként előfordulhat különösen hegyes sarkok esetén, hogy az utasítás nern tölti ki az 
egész alakzatot. Ez azonban nern az utasítás hibája, hanem inkább az az eljárás eredmé- 
nyezi, ahogyan a vonalak, ellipszisek... stb. a képernyőn létrejönnek. 

A BLOCK utasításiól eltérően PAINT-nál a LOW COL hatásos marad. Megtehetjük tehát, 
hogy a BLOCK utasítást szükség esetén a REC-PAINT utasításkombinációvai helyettesít- 
jük (lásd: REC, BLOCK). 

A leírtakat a következő két péidán szemléltetiük; 
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9 
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1 REM E4ttitttkkkérrt 

ESNREMSKESES ESEL EE 

zZ REM GtetrtttrtttkkkE 

188 REM 

118 REM $444EKREE 

128 REM ELLIF 

128 REM E£E4E4d k 

149 FEM 

1540 HIRES 8.98:REM GRRFIKA BEKAPOSOLASR 

166 CIRCLE 1€9, 109. 50558, 1:REMH ELLIPSZIS RRJZUÜLAZER 
178. PAUSE 1 

128 PHINT i99. 198. 1:FREM SZINEZES 

19A-PELISE a 

2üG RELC1g, 19.63. 78.1:REM TEGLALAF RAJZOLRSA 
2149 FHUSE 1 


2zed PRINT £154141 
238 FHAUSE 18 

248 REM 

259 FEM Ftttktkttk 
260 REM 2. ABR 
zró REM kékktktkkk 


z 2.9:REM GRAFIKA TÜRLESE 

208 REM kiktktkkkk 

219 REM SÜKSZüÜG 

328 REM. EEtttbktttb 

330 REM 

340 LINE198. 186. 58. 78. 1 

358 LIMNESG., 73.158. 129,1 

569 LINE15A, 128, 12829, 1 

370 LINE12A. 29.309. 199, 1 

3948 LINE3A9 , 199. 16E6. 198. 1 

398 LINE1€e9, 198, 159. 1701 £ 
408 LIME164. 176. €6. 194. 1 

418 LINE6A, 159. 198. 189. 1 

429 PRUSE 1 

430 PAINT 191.,181.1:REM MEZN SZIMEZESE 

440 PAUSE 18 

450 PRAINT 1081.181.8:REM MEZO TÖÜRLESE 

460 WRIT 198,255:REM VARAKOZAS EGY GOMB LENYOMASARA 
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1 REM EtfttkEEkEE 
2 REM £k 2.PRINT 
23 REM E4EEEEEEEEKE 
182 REM 
118 HIRES 2.2 :KEM CRARFIKRA BEKAPCSÜLRSA 
128 
fej) 


a CIRCLE 166, 198.238.49.1 :REMH BELSO 

6 CIRCLE 168.188.50.88.1 :REM KÖZEPSÜ 

148 CIRCLE 1E€9.189.7A.29.1 :KEM KULSO 

156 FAIMT 1E€9429. 190429. 1 : REM KÖZEFSO SAV KITÖLTÉSE 
1Eg "AIHMT a, a.1 :PEM KULSO MEZŰ KITÜLTESE 
17ú PAUSE 19 

1983 REM 

198 REM EkE4E4EKE 

240 REM VIRAG 

216 REM kiötterttererk 


248 CIRCLE 1€g, 109, 18, 
25 CIRCLE 1€6.188.38. 
260 CIRCLE 1€3.199.5A, 
27a FRINT 1E3 
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zö8 PAIHT 16M. 169428 :1 
290 PRAINT 160. 198-38 .1 
280 PHINT 161143, 1aü, 1 
918 FRTRT 1€1-428. 189.1 
329 MAIT 19£.255 


12.3.10 Ellenőrző kérdések 


Végre elérkeztünk a fejezet végére, ellenőrizhetjük, hogy mennyit sikerült elsajátítanunk 
a tanultakból. 


1. Melyik a helyes formátum? 


a) PLOT 1,0,0: (Rajzol egy pontot a (0;0)-pozícióba.) 

b) TEST (100,100): (Megvizsgálja, hogy a (100;100)-koordinátájú pont be van-e kap- 
csolva.) 

c) IF TEST (100,100) — 0 THEN 90: (Ha a (100;100)-koordinátájú pontnines bekapcsolva, 
a program a 90. sorban folytatódik.) A 

d) REC 10,20,100,150: (Rajzol egy olyan téglalapot, amelynek két szeínközti csúcsa a 
(1020) és a (100;150) pontokban van.) : 

e) BLOCK 10,20,100,150: (Rajzol egy olyan kitöltött téglalapot, amelynek két szemközti 
csúcsa a (10520) és a (100;150) pontokban van.) 

f) ARC 160,100,0,360,12,50,70,1: (Rajzol egy teljes ellipszist.) 


2. Szeretnénk a CIRCLE 160,100,40,30,1 utasítással megrajzolt SÜRSzE "kiszínezni". 
Melyik utasítást használjuk? 


a) BLOCK 160,100,40,30,1 
b) PAINT 160,100,1 

c) PAINT 0,0,1 

d) BLOCK 160,100,1 


3. Egy 10 pont vastagságú keretet akarunk rajzolni. Melyik utasításkombinációt kell 
választanunk? : 


a) FOR X-—0 TO 9:REC 100--X, 100-4-X, 50—2rX, 60—2rX,1: NEXT X : 
b) BLOCK 100,100,150,160,1:BLOCK 110,110,140,160,0 

c) REC 100,100,50,601 :REC 110,110,30,40,1:PAINT 105,105,1 

d) REC 100,100,50,60, 1 


152 


12.4 Egyéb ábrák rajzolása 


12.4.! DRAW - tetszőleges alakzat rajzolása 


"Formátum: DRAW" füzér" ,x,y,rü 
Paraméterek: füzér — Egy karakterlánc vagy egy füzérváltozó, amely az ábrát definiálja 


x — A kezdőpont x-koordinátája 
MC: 0—159 / FFB: 0—319 
y — A kezdőpont y-koordinátája 


MC: 0-199 / FFB: 0—199 
rü — Az üzemmód kódja (0-2) 
Funkció: Rajzol egy tetszőleges ábrát 
Példa: DRAW"5678", 160,100,1 
DRAWA$ — , 160,100,1 


Eddig csak prógramozott, számítási algoritmussal előre meghatározott alakzatokat raj- 
zoltunk, amelyeket legfeljebb nagyítani vagy torzítani (CIRCLE) tudtunk. Ezekhez a műve- 
letekhez azonban először mindig meg kellett adnunk a kiindulási alakzatot is. Tetszőle- 
ges, összetett ábrákat esetleg a PLOT-tal és a LINE-nal rajzolhattunk, de ez nagyon sok 
időt és tárolókapacitást igénylő eljárás. Ezen túl az elkészült rajz elcsúsztatása vagy 
esetleges elforgatása BASIC-ben szinte megoldhatatlan. A SIMON s BASIC DRAW utasí- 
tása nélkül felesleges is próbálkoznunk vele. 

Ezzel az utasítással egyszerűen és minden egyéb módszernél gyorsabban hozhatunk 
létre tetszőleges alakzatokat, amelyeket azután a képernyőn bárhol elhelyezhetünk, sőt 
nagyíthatunk és el is forgathatunk. 

Az ábrát a "füzér"-paraméter tartalmával definiálhatjuk. Azaz a következőkben ismerte- 
tésre kerülő módszerrel létrehozunk egy füzért (ami lehet egyszerűen egy karakterlánc, 
de lehet füzérváltozó is), amit a DRAW utasításszó után Írunk, természetesen idézőjelek 
közé! 


Hogyan is állíthatunk össze egy ilyen ábrát? 


Úgy kell elképzelni, mintha a számítógép ceruzával rajzolna a képernyőre. Nekünk csak 
azt kell megmondanunk, hogy a "ceruza" , ill. valójában a kurzor, a négy lehetséges irány 
(fel, le, jobbra, balra) közül merre mozogjon. Az elmozdulás egységnyi hosszát a későb- 
biekben tárgyalt ROT utasítással adjuk meg. 

Ugyanakkor azt is előírhatjuk, hogy a "ceruza" az adott irányban rajzoljon-e, azaz 
húzzon-efegy vonalat, vagy csak a "papír" (ill. képernyő) felett rajzolás nélkül mozdul- 
jon-e el. Az így létrehozott kétszer négy funkció az alábbi kódokkal adható át a számító- 
gépnek: 


kód mozgásirány rajzolás 
ÜZE lete bu S e ENEK ő JODDEA száz sszzteé zta s áá táó nincs 
EA ASZT ezető ús éges zal sál TSZ Esz Ste ke ette tele ks nincs 
ZA gk ENSÚE EZÉ át áhó e Eeen tértáés TOL éste ébÉ a EZEKEN ee ÜE VES nincs 
ELNE 4 s TELE SES Tt ee DAÍRAS tt zks ee ege ee ér nincs 
E ÉVE TE ÖN EY Stt (Sár ető a VO É S ség tást éa nincs 
ÖSS ék FM AABO ET 4 dés 4 4 El ÜSS JODDTA zs s s ég e elé van 

OSZ ee ea ez ám áls TOT skeet sk enis a ÖMLŐ van 

Tsezé más bas ee sut E LÖz Sk lassa s élsz sa lése van 

Bea ése b eDÉ ege og KB Et bálra: zés ézásotie sze ezeti áet van 

MESÉK Zra Ta BÚS lag e NÉ ál a rajzolás megszakad 
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Tehát: 
1/6 


3/8 0/5 


2/4/7 


A 9-es kódhoz nem tartozik rajzolási funkció, hanem a rajzolási művelet megszakítását 
eredményezi, még akkor is, ha további kódok követik. A kézikönyvben leírtaktól eltérően 
azonban nem szükséges minden füzért 9-essel zárni. 

Az alakzatot tehát az egymás után következő irányutasításokból álló füzérrel definiálhat- 
juk. A füzér maximális hossza 256 karakter lehet. Mivel egy BASIC sor 80 karakterből áll, 
az ennél hosszabb füzéreket a következő trükkel, több sorból kell összefűznünk: 


10 A$— "1234567890123456789012345678901 
234567890123456789012345678901234567890" 
20 A$-A$ Tt "12345678901234567890" 


A füzér mellett még további három paramétert kell megadnunk ahhoz, hogy a szintaktika 
helyes legyen. Ezek közül az utolsóval (rü) itt már nem foglalkozunk, mindent megtudhat- 
tunk róla a 12.2. fejezetből. Az x- és y-paraméterekkel a képernyőn kijelölhetjük a 
"ceruza" (azaz a grafikus kurzor) indulási helyét. A számítógép ehhez a ponthoz viszo- 
nyítva dolgozza fel a definiáló-füzért. 

A DRAW utasítás egy szép alkalmazási lehetősége a sprite-ok ilyen alakzatokkal (ún. 
shape-ok) való kiegészítése, amelyek törléssel és más helyen történő gyors újrarajzolás- 
sal mozgathatók a képernyőn (lásd-a P. 80-as példaprogramot). Ezzel a technikával 
mindenképpen érdemes megismerkedni! 

Az utasítás előnye még többek között, hogy a ROT utasítással (12.4.2 fejezet) nagyítható 
és elforgatható. 

A példaprogramok: 


P. 79 


1 REM Kittkkktktkkk 

2 REM$KI1I.NDRAMHWHA 

3 REM $iiktktkkkkkkk 

100 REM . 

119 HIRES 6.7:REM GRAFIKA BEKAPCSOLASR. 

129 ROT ú.48:REM ELFURGATRS NMNIMCS. HAGY-SAG-4D 

134 DRAH "65789", 168. 198.1:REM NEGYZET RAJZOLÁSA 

148 REM RAJZOLRS IRANYA - FEL. JOBBRA.LE. PRLRA 

159 WAIT 192.255:REM. VARAKOZAS EGY BILLERTYI LENYOMASARA , 


Fenti példánkat gyakorlóprogramnak szántuk. Változtatgassuk a paramétereket és figyel- 
jük meg az eredményt. A definiáló-füzér végéről a 9-est elhagyhatjuk, mint azt már az 
előzőekben említettük. 
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! REM E§éXEEEFKP 
: REGE ZEÜ ÖK HW 
Z REM EREREREREETEKK 
19a 1 

119 


P. 80 
1 


PEM seek 
FEH 
TATFI" 


n 
S TRE 


JI a b ja ba Fk bes já A 
71 LA 3 da Pa 


DATA "666 


REM PO stssts ár szkostóN 
3 REM 
HIRES £. 
ROOT §.4:REM ELFORGATRS HINCS. HAGYSROS4 

j FOR Az1i TŰ 11 

REAN A$: REM NOTA SÖRÖK KIOLYASASR 

a DRAM A£. AZALTAL OKÁ,1:REM BETLIK 

a MEST A 

PAUSE 5 

REM Htttkkekkbk ke dee tékek kék 

REM BETÜK . SZELESÍTESE 

REM EEGEEKEKETEK EKE EE kk 

REM 

a RESTÜRE :REM ADARTMUTATÓ VIZSZHALLITRSA 

a FOR Xz1i TŰ 11 

READ A$:REM HATHA SÖRÜK KIOLYAZASA 

FOR 2: TŐ 7:REM SZELESSEG-CIKLIIS 

A DRAW A$.-429—-2942, SAH104542.1:REM FETUK RAIZOLASA 
NEST zZ 

 NEXT A 

aa HAIT 198,255. REM VARAKOZAS EGY BILLEMTTI! LEHTOMASARA 


Ez a program a DRAW utasítás felhasználásával egy feliratot készít, amelynek betűit a 
DATA sorokban lévő füzérekkel definiáltuk. A DATA sorok elemeit a READ utasítással 
egymás után beolvassuk az A$ stringváltozóba. Minden DATA sor egy betűt definiál, amit 
a REM kijelzésben feltüntettünk. 

Végül a betűk megjelennek a képernyőn és a következő lépésben kialakul a vastagságuk. 
A vastagságot a sorokban előírt számú, eltoltan megjelenített betükkel alakítottuk ki. 
Próbáljuk ki, mi történik, ha itt a STEP értékét megváltoztatjuk! 


RT 
BH 
GE 
Cge 
R 
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12.4.2 ROT - elforgatás, nagyítás 
Formátum: — ROT f,n 
Paraméterek: f — az elforgatás szögének kódja (0—7) 
n — a nagyítás mértéke (0-—255) 
Funkció: A DRAW-val megrajzolt alakzat elforgatása és nagyítása 
Példa: ROT 0,20 


A DRAW egy csomó lehetőséget rejt magában, amellyel megkönnyíti grafikáink készíté- 
sét. Az egészre azonban a ROT teszi fel a koronát. 

A ROT utasítással a kialakított alakzatot a kezdőpontja — mint forgástengely — körül 
elforgathatjuk, azaz megdönthetjük, vagy akár a feje tetejére is állíthatjuk, ha úgy tetszik. 
Nyolc meghatározott forgásszöget tudunk az alábbi kódokkal megadni: 


f forgásszög 


0 fok 
45 fok 
90 fok 

135 fok 
180 fok 
225 fok 
270 fok 
315 fok 


Ha tehát a 0. kódot választjuk, a DRAW-val definiált rajz eredeti helyzetében marad. Ha 
a kód 1, az alakzat az óramutatóval egyirányban, 45 fokkal elfordul. (Itt nem a matemati- 
kai szögméréssel dolgozunk). 7-nél nagyobb érték megadása esetén a BAD MODE 
hibaüzenetet kapjuk, amellyel már egyéb utasításoknál megismerkedtünk. 

A ROT utasítás néhány különlegességére fel kel! hívni a figyelmet: 

Ha a rajzot a kiindulási pont körül elforgatjuk, előfordulhat, hogy megváltozik más 
alakzatokhoz vagy a képernyő egészéhez viszonyított mérete. 

Páratlan f értékek esetén (1, 3, 5, 7) az ábra mindig nagyítva jelenik meg. Ennek az az 
oka, hogy az elforgatás során a pontok nem kör-, hanem négyzetpályán mozognak. 
A következő néhány soros program ezt szemlélteti: 


NOONAROVGNRVNIO 


P. 81 

1 REM £44t6KEKEKET 

2 REM $ I.ROŰÜT E 

3 REM $EtttirEtrtb 

199 REH 

118 HIRES 2.3:REM GERFIKA BEKRPCSOLASA 
3 TO 7 


DRAHW"E", 1690. 198.1:REM VONAL RAJZOLASA 

169 NEXT R 

179 WAIT 199.255:REM VARAKOZAS EGY. GOMB LENTOHASARH 
Az f mellett, mint látjuk, még egy paramétert meg kell adnunk: az n-et. Ez az a tényező, 
amellyel a rajzunk nagyságát határozhatjuk meg. Normál esetben a lépésnagyság (vagy 
hosszúságegység) minden irányban ffel, le, jobbra, balra — mint DRAW-nál) 1 pont. Ezt, 
ill. ezzel együtt az ábra nagyságát növelhetjük az n-nel. Ha n— 1, az ábra nagyítás nélkül 
jelenik meg. Ezek néha olyan parányiak, hogy már csak a láthatóságuk miatt is kénytele- 
nek vagyunk őket felnagyítani. n értéke 0—255 lehet, ahol a 0 a 256-szoros nagyításnak 
felel meg. Ha a nagyítás miatt a rajz túlnyúlik a képernyőn, két eset lehetséges. 
Kismértékű túlnyúlás esetén a képernyő szegélyén kívülre eső részek eltűnnek, egyéb- 
ként pedig, az egyéb grafikus utasításokhoz hasonlóan, a képernyő egy más részén 
jelennek meg. 
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Magától értetődően itt is ügyelnünk kell a megváltozó méretarányokra és a többszínű 
(MC) üzemmódban előforduló torzításokra. 
A továbbiakban példákon tanulmányozhatjuk a ROT és a DRAW utasítások alkalmazását: 


P. 82 
REM áséntságáe ést 


113 REM tétktEttkbtkkb 

123 REM ÜPRMUTATO 

139 REH $tttdktttkkkkb 

140 RE/1 

158 HIRES 7,E:REM GRAFIKA EEKHEOSOLAZR 
166 FOR T-1i TŰ 28:REMH KÜRCIKLUSZ 
176 FOR Xzü TŰ 7 :REM FÜRGHATBS 
198 RüT L, dA:REM UTOLSO FORGATHE 
199 HRALM "E", 187. 188.€g:REM UTM ZO 
z2z9a ROT X.48:REM UJ FORGATÁSI 
214 DRAM ug , ien. 1988.1:REM VÜHAL PAJZOLASA 
22 L-X:REM UTOLSO FÜRGATASI SZOG TBROLAZA 
230 MEXT s 

248 MEST T 

250 PAILISE 3 

26A KET 

z7rü REM ksésárásívásáásáki 

290 REM kie 
29 REM ktkkkkkkktk 

300 REM 

z HIRES 7.6:REM GRAFIKA TÖRLESE 

FÜR szi TŰ 67 

RÜT $4/18.X:REM FORGATAS EZ NAGTYITAZ 
URAM "gE5SE77ESZE", 1EM.18m. 1 

ü MNEAT S 

FALSE 14 

REM 

a REM titkkkkkkkk 


I SZÖG PERARLLITASR 
7 . VONAL TÜRLESE 


REM 

HIRE3 7.E£:REM GRAFIKA TÖRLESE 

na FÜR A-1 TA €2 

ű ROT X/713.X:REM FORGATAS ES HAGYITAS 

B DRAM "599857££"., 168. 198. 1 

NEST 9 51 
a HAIT 198.255:REM VARAKOZAS EGY GÜHE LENYOMAZARA 


Az első részben a körmozgás előállítását figyelhetjük meg. Ahhoz, hogy a mozgás 
lehetőleg folyamatos legyen, először mindig meg kell jeleníteni a figurát a következő 
pozícióban és csak azután lehet az előző helyről törölni. Néha, elsősorban nagy ábrák 
esetén ez a módszer a vonalak zűrzavarát okozhatja, ezért ilyenkor ajánlatos fordított 
sorrendben eljárni. Új koordináták megadásával az elforgatáson kívül különböző irá- 


nyokba történő elmozdulást is létrehozhatunk. Következő programunkkal ezt mutatjuk 
be: 
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P. 83 


1 REM sértek tededekk kek 
2 REM X3.RÖÜTHA 
3 REM Hefekkttetekeekik 


190 
119 
129 
194 
148 
159 
166 
178 
189 


REM 8 

HIRES 2.3:REM GRAFIKA BEKRFECSOLASA 

ROT §.28:REM FORGATAS NINCS 

FOR 4Az1 TO 3139 STEP 4 

DRAUH "6578" .A.199.6:REM TÖRLES A REGI POZICIORŰL 
DRAW "6578".5.198.1:REM RARJZOLAS AZ UJ PÜZICIÓEA 
-A:REM A REGI FOZICIO TARULASA 

NEXT X 

WAIT 198.255:REM VARAKOZAS EGY GONE LEHVYOHASARA 
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12.4.3 Ellenőrző kérdések 


a 


Ismét egy fejezet végére értünk. Ellenőrizzük, mit sikerült elsajátítanunk belőle. 
1. Melyik utasítást kell választanunk, ha egy négyzetet akarunk rajzolni? 


a) REC 160,100,70,70,1 
b) DRAW "01283", 160, 100,1 
c) DRAW "5687" ,160,100,1 
d) ROT 4.5 


2. Ábránkat az óramutatóval ellenkező irányban, 90 fokkal el akarjuk forgatni, valamint 
ötszörösére akarjuk nagyítani. Melyik utasítást kell választani? 


a) ROT 90,5 
b) ROT 25 
c) ROT 6.5 
d) ROT 5.2 


3. Melyik kód definíciója helyes? 


a) 0: jobbra, rajzolás nélkül 
b) 8: jobbra, rajzolással 

c) 4: balra, rajzolás nélkül 
d) 6: felfelé, rajzolással 

e) 9: lefelé, rajzolással 
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12.5 Szöveg a grafikában 


12.5.1! CHAR - karakterek rajzolása 


Formátum: CHAR x,y,e,rü,n 
Paraméterek: x -— A karakter bal felső sarkának x-koordinátája 
MC: 0—159 / FFB: 0—319 
y — A karakter bal felső sarkának y-koordinátája 
MC: 0—199 / FFB: 0—199 

c — A karakter képernyőkódja (0—255) 

rü — Az üzemmód kódja (0-2) 

n — A karakter függőleges nagysága (0—255) 
Funkció: Karakterek rajzolása a képernyő adott helyén meghatározott nagyságban 
Példa: 160,100,3,1,2 

Ezentúl nem kell a grafikáinknak névtelenül megjelenniük. Feliratozhatjuk, 

vagy magyarázattal láthatjuk el azokat. 
Ez az utasítás lehetővé teszi számunkra, hogy betűket vagy grafikus jeleket jelenítsünk 
meg a képernyőn, tetszés szerint normál vagy inverz alakban. A karaktert a c paraméter- 
rel definiáljuk. A 9. fejezetben az FCHR vagy FILL utasításoknál már említettük, hogy a 
betűket és más karaktereket a C64-es nem az ASCII kóddal tárolja a képernyőtárolóban. 
Az inverz karakterek ugyanis csak így kódolhatók. Pl. a CBM 64 kézikönyvben megtalál- 
ható a képernyőkód táblázat. Az inverz karakterek kódját úgy kapjuk meg, hogy a normál 
karakterkódhoz hozzáadunk 128-at. A táblázat segítségével értékeket adhatunk a c 
paraméternek (c—5 esetében, pl. a normál E betű, 5-4 128 — 133 esetében az inverz 
E betű jelenik meg). 
A jelkészletek közti válogatásra nincs módunk, csak a nagybetű/grafikus jelkészletet 
használhatjuk. 
A továbbiakban az x és y paraméterekkel meg kell adnunk a karakter bal felső sarkának 
pozícióját. 
A paraméterek sorát az "n" zárja. Funkciója, ugyanúgy, mint a ROT utasításban, a 
karakter nagyságát határozza meg, de csak függőleges irányban. A karakterek vastagsá- 
gát nem befolyásolja. Az n értéke 0—255 között lehet. Az n—0 és az n--: 1 azonos hatású. 
Természetesen nincs értelme 30-nál nagyobbra választani, hiszen akkor már a karakter 
olvashatatlanná válik, sőt túl is nyúlhat a képernyőn. 
Ezzel az utasítással tehát egyszerűen és gyorsan feliratozhatjuk az elkészített grafikát, 
sőt a grafikus jeleket a kép elemeiként is felhasználhatjuk. 
Korábbi gyakorlatunkhoz híven először egy gyakorló példát mutatunk be. A paraméterek 
változtatásával (amelyeket a REM sorokkal megjelöltünk) tanulmányozhatjuk az utasítás 
működését. . 


P. 84 


1 REM Etekteketelek 

2 REM $I.CHAR E 

3 REM kikkeökteekkkek 

190 REM 

119 HIRES 1,ú:REM GRAFIKA BEKAPCSOLASA 
128 REM GYAKORLO PELIA 

138 REM VALTOZTASSLK A FARAMETEREKET ! 
149 REM 

15a REM XI YI CIZM! G 

160 REM ———— seem 

179 REM ! ! ! 

199 CHAR 169.108, 2. 1.3 

199 REM ——-————— erne 

280 HAIT 198.255:REM VARAKOZAS EGY GOMB LENYUHASARA 


160 


P. 85 

1 REM Eikttkklekekk ik 
2 REN k 2. HARA 
3 REM KEEREEPEKEEREK 
1 
1 
1 


aB REM 

18 REM $EttttkkkEEKEE 
z2zü REM ZET 
128 REM $étkEKETEKKEEKK 
149 FEM 

150 HIRES 5.6 


160 FOR d TA 255 

178 T - X/45 

199 CHAR FERCCTIK4OHBXZZ KV. 2 
199 MEST 

zag FAUSE za 

218 REM 

228 REM tittttktkkkk 

3 REM NARGYSAG 

249 REM tEE4EEEKHEKE 

234 REM 

268 HIRES 5.6 

27A FÜR 4z1 TO 2£E 

39 CHAR SES. XA LX 

99 MNEXT 3 

pa HAIT 198.255:REM VARAKOZP3 EGY GOME LENYOMASARA 


A fenti program első részében a teljes karakterkészlet előállítását, a második részében 
pedig a nagyítás folyamatát figyelhetjük meg. Jó szórakozást! 


12.5.2 TEXT - feliratozás 
Formátum: TEXT x,y.str,rün,t 
Paraméterek: x,y — A szöveg első karaktere bal felső sarkának koordinátái (ld. az előző 
pontot) 
str — A kiírandó szöveg, idézőjelek között. Füzérváltozóként (string) is 
megadható 
rü - Az üzemmód kódja (0-2) 
n —- ArwKkarakterek függőleges irányú nagysága (0-255) 


t  - Két karakter azonos pontjainak távolsága 
Funkció: Felirat megjelenítése 
Példa: TEXT 50,100,"TEST",1,3,15 


Mint láttuk, a CHAR utasítással a grafikába egyszerre csak egy karaktert írhatunk. Ez azt 
jelenti, hogy hosszabb szöveg kiírása ezzel az utasítással csak körülményesen oldható 
meg. Ilyenkor használjuk inkább a TEXT utasítást. Ezzel egyszerre egész karaktersoroza- 
tokat Írhatunk be a grafikába. 

Ez az utasítás működésében kissé eltér a CHAR utasítástól. Először is meg kell határoz- 
nunk a felirat pozícióját, ami legelső betűje bal felső sarkának x- és y-koordinátái 
megadásával történik. Ezután kell megadnunk a felirat szövegét; ez lehet füzérváltozó, 
amelyhez a megfelelő szöveget előzőleg hozzárendeltük, de lehet konkrét karaktersoro- 
zat is. Ez az utasítás lehetővé teszi a különböző karakterkészletek felhasználását. Azt, 
hogy éppen melyik legyen érvényben, előre meghatározhatjuk, de a füzéren belül is 
előírhatjuk. A CTRL/AA billentyűk lenyomásával az első, azaz nagybetük/grafikus jelkész- 
letre (a füzérben egy inverz "A"), míg a CTRL/B (füzérben inverz "B") lenyomásával a 
második, azaz kisbetű/nagybetűs jelkészletre kapcsolhatunk. Összefoglalva: 


Billentyű: Funkció: Füzérben: 

CTRL/A nagybetű/grafikus inverz "A" 
jelkészlet 

CTRL/B kisbetű/nagybetű inverz "B" 


jelkészlet 161 


Ezzel a módszerrel a füzéren belül is váltogathatjuk a karakterkészletet anélkül, hogy az 
előző kijelzéseket befolyásolnánk. 
Ha az üzemmódra vonatkozóan semmilyen előírást nem alkalmazunk, automatikusan az 
első, azaz a CTRL/A lesz érvényben. Az alábbi kis példával mindez kipróbálható: 

10 HIRES 6,7 

20 TEXT 50,100"(CTRL/A)TEXT-(CTRL/B)TEXT",1,1,8 

30 WAIT 198,255 


A CTRL/A és a CTRLZB természetesen a két billentyű egyidejű lenyomását jelenti. 

A két további paraméter (rü és n) az előzőekből már ismert. rü a rajz-izemmódot, n pedig 
a karakterek függőleges nagyságát határozza meg. 

A továbbiakban az utolsó paraméterrel (t) megválaszthatjuk a karakterek közti távolsá- 
got. Ezen két egymás mellett lévő karakter bal felső pontjainak képernyőpontokban mért 
távolságát értjük. Mivel 1—1 karakter egy 8 xX 8-as mátrixban helyezkedik el, t3 7 értékek 
esetén a karakterek átfedik egymást. A feliratot ezzel a paraméterrel tetszőlegesen szét 
is húzhatjuk és ezáltal különleges hatásokat érhetünk el. 

Győződjünk meg a leírtakról. A TEXT utasítás a variációk széles skáláját kínálja, próbál- 
juk ki. 

Ki kell térnünk még az utasítás egy kis hiányosságára: a rendelkezésünkre álló SIMON s 
BASIC V2 változat nem fogadja el változóként sem a t-, sem az n-paramétert. (Ezt már 
a 9.4.3 pontban, a MOVE utasításnál is említettük.) Ha mégis így próbáljuk megadni, vagy 
eltűnik a felirat, vagy további karakterekkel bővül. 

Ezek után nézzük a példákat. 


Először is a már ismert gyakorlópélda, amelyen tanulmányozhatjuk az egyes paraméte- 
rek funkcióját. 
P. 86 
1 REM EtFEEEEEFEEKETK 
S ARET E ts The ék a 
3 REM StEEEKEEEFKEKK 
183 REM 
118 HIRES 1.8:REM GRAFIKA BEKAFCSOLRSRA 
128 REM GYAKORLO FELDH 
138 REM VALTUZTARSSUK FH FPARAMETEKEKET. ! 
148 REM 
158 REM A... YI STR SZME GY HA 
zás BA ad s bi fellege segge gek nden tán a EZAZ szé SZÉ KEZES s tszö JHÓÖt CAGE kzl KENE Sai 
178 REM ! ! ! ! 
199 TEXT S48.íÍí08. "SZÖVEG" , 1, 2. SA 
LESTAT ERETT tt e ee E tek si ése ös nd tonöka tet Átt GÍSÁZÉE 
28 WRIT 198.255:REH VARAKOZAS EGY GOMB LENTYOMASARA 
P. 87 
1 REM E4E4EKEERKEKKE 
E REPEZSNSE 5062 3K 
3 REM t4tEkkkkkkkkk 
1989 REM 
118 HIRES 9. 18:REM GRAFIKA BEKAPCSULASA 
129 FÜR z1 TO 2 
138 TEXT 188.25£4—29, "CBM 64".,1.3.28 
149 NEXT X. 
159 PALSE 5 
160 REM 
178 REM 
199 HIRES 9.19:REM GRAFIKA TORLESE 
198 REC 4.4.311.191.1 
289 LIME A.9.319.199.1 
210 LINE 319.9.A.,193.1 
229 BLOCK 98.88. 224, 129. 1 
230 ELOCK 199.99.219,119.0 
249 TEXT 183.,97,"SIMON7S BASIC", 1.1.§8 
238 MRIT 198.255:REM VARAKOZAS EGY GOMB LENTOMASARA 
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12.5.3 Ellenőrző kérdések 


A fejezet végén, mint már tudjuk, ismét ellenőrző kérdésekkel győződhetünk meg arról, 
hogy mit sikerült elsajátítanunk. Nos, munkára fel! 


Melyik utasítást kell választanunk? 


a) CHAR 160,100,128-t 1,1,1 
b) TEXT 160,100,"A",1,1;1 
c) CHAR 160,100,1,1,1 

d) TEXT 160,100,7A"1,2,3 


2. Mi történik a rajzolandó karakterrel, ha a CHAR vagy a TEXT utasításban a t-paramé- 
ter értékét növeljük? 


a) A karakter függőleges méretei csökkennek. 

b) A karakter x-irányú méretei nőnek. 

c) A karakter y-irányú méretei nőnek. 

d) A karakter mindkét irányban nő. 

e) A karakter vízszintes irányú méretei csökkennek. 
f) Egyik megoldás sem helyes. 


3. Mekkora legyen a t-paraméter értéke, ha azt akarjuk, hogy a TEXT utasításban a 
karakterek távolsága 1 pontnyi legyen? 


aaodcp 
SZ sz s sas ésső 
meet 
LG KEZ SRL) 
00. a 


o 
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13. FEJEZET K 
KARAKTERKÉSZLET LÉTREHOZÁSA 


A Commodore 64-es a szokatlanul változatos grafikus utasításokon kívül még más 
különlegességeket is kínál. Ezek egyike e karakterkészlet szoftver útján történő megvál- 
toztatásának lehetősége, mely bizonyára nagy érdeklődésre tarthat számot. Ez ugyanis 
szinte az összes számítógépes játék alapja, valamint (a sprite-ok mellett) ez teszi a CBM 
64-esen futtatott játékprogramokat gyorssá és ugyanakkor látványossá. Enélkül egy 
értelmes játékprogram elképzelhetetlen lenne. Míg más számítógépek kínlódnak a nagy 
grafikus tárolóval, addig a C64-esnek ez meg se kottyan. Ezzel kapcsolatban néhány 
kérdést azért tisztáznunk kell. 


Mit is értünk karakterkészlet alatt? 


Első közelítésben a kérdés egyszerűen megválaszolható. Karakterkészletnek azok ka- 
rakterek (betűk és grafikus jelek) összességét nevezzük, melyeket a különböző billentyűk 
és billentyükombinációk (SHIFT,C—) működtetésével a képernyőn megjeleníthetünk. 
Ezeknek a karaktereknek az alakját a számítógépnek természetesen ismernie, azaz 
valahol és valahogyan tárolnia kell. További feltétel még, hogy a karakterek valamilyen 
jól meghatározott rendszer szerint helyezkedjenek el, mivel a számítógép csak így fogja 
az "A" billentyű lenyomása után a képernyőn az "A" betüt megjeleníteni. Természetesen 
ezek az információk minden számítógépben megtalálhatók. 

A CBM 64 esetében a karakterkészleteket tartalmazó tár minden programból elérhető, 
vagyis tartalma olvasható és más tartományokba átvihető. Mindezzel azonban még nem 
sokra megyünk, ugyanis az említett tár tartalmát nem tudjuk megváltoztatni (az ilyen tár 
közismert neve: ROM). Más a helyzet az ún. RAM-mal, melyben a programok és a 
változók találhatók, és ez a számítógép kikapcsolásával kiürül. (RAM- Read Access 
Memory, írható-olvasható memória). 

Az előbbiekből következik, hogy a BASIC operációs rendszer szintén a ROM-ban talál- 
ható. 

Van azonban olyan lehetőség is, hogy az egyes karakterek tárolócímét megváltoztassuk. 
Így olyan utasítást is adhatunk a CBM 64-esnek, hogy a karakterek körvonalát jelentő 
információkat ezután ne a ROM-ból, hanem az $2000( — 8192) címmel kezdődő tartomány- 
ból (vagyis a RAM-ból) kérdezze le. Ebben a tartományban pedig már elvégezhetjük a 
kívánt módosításokat. Ha az eredeti karakterkészletet előzetesen a RAM-ba másoltuk, 
először semmit sem veszünk észre, mivel minden információ változatlan marad. Ameny- 
nyiben viszont módosítjuk ezen tartomány bizonyos elemeit, megváltozik az ehhez 
tartozó karakterek alakja is. Ezzel a következő kérdés adódik: 

Hogyan tárolja a számítógép az egyes karakterek alakját? Először ís — mint tudjuk — 
számítógépünk összesen 4 karakterkészlettel rendelkezik, melyek mindegyike 128 karak- 
tert tartalmaz. A karakterkészletek (kijelzési üzemmódok) közül legfeljebb kettő lehet 
érvényben. A 4 karakterkészlet a következő: 


A/1 karakterkészlet — normál nagybetük/grafikus jelek. 
A/2 karakterkészlet — inverz nagybetűk/grafikus jelek. 
B/1 karakterkészlet — normál nagybetűk/kisbetűk. 
B/2 karakterkészlet — inverz nagybetűk/ikisbetűk. 


Az A és B karakterkészleteket az ismert módon, tehát a C- és SHIFT billentyűk egyidejű 
lenyomásával közvetlenül cserélhetjük. A programból történő átváltáshoz a 14 és 142 
(128-- 14 — 142) ASCII-értékeket kell használni, tehát 


PRINT CHR$(14)-gyel 
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a B készletre, míg a 
PRINT CHR$(142)-vel 

az A-ra kapcsolhatunk át. (Lásd még a CSET 8 és CSET 1 utasításokat is). Pl. a 
PRINT CHR$(8) 


utasítással letilthatjuk a billentyűzetről végzett (programfutás közben is kivitelezhető) 
átkapcsolási lehetőséget, míg ennek feloldása a 


PRINT CHR$(9)-cel 


történik (lásd a CBM 64 kezelési kézikönyvet). 

A normál (1) és inverz (2) ábrázolás a (RVS ON) és (RVS OFF) billentyűkkel váltható 
ki. A memóriában minden karakterkészlet külön kell, hogy szerepeljen. Összesen tehát 
4x 128 — 512 karaktert tárolhatunk, de közülük egyszerre csak 256-ot használhatunk. 
A képernyőn minden karakternek egy 8 Xx 8-as pontmátrix felel meg. Ez azt jelenti, hogy 
a memóriában is 64 pont felel meg egy karakternek. A gyakorlatban ez úgy valósul meg, 
hogy egy képpontot egy bit képvisel, így egy karakter tárolásához összesen 64 bitre, 
vagyis 8 byte-ra van szükség. Az egyes byte-ok a karakter különböző sorait ábrázolják. 
Az "1" értékű bit a bekapcsolt állapotnak felel meg. 

A karakter megjelenítése a következőképpen szemléltethető: 


Okt 2 Ba ráer 2585 B. €bit 
0 byte 
1 byte 
2 byte 
3 byte 
4 byte 
5 byte 
6 byte 
7 byte 


A karaktertároló 512 ilyen, egyébként 8 byte-os, kódsorozatból áll, amely összesen 4K 
(- 4096 byte) ROM-kapacitást foglal le a $D000-$DFFF (53248—57344) címek között. Példa- 
ként lássuk, hogy tárolja a számítógép a nagy A betű képét: 

[0 1 2 3 4 5 6 7 bit 


0 byte ; B § hi kk 3 

1 byte ai hé ik x ú 
2 byte ak haj há ak 
3 byte kk ak ak a ak kal 
4 byte kk xk 8 ka 
5 byte ae ak ae ak 
6 byte ak a ka ak 
7 byte 


Ez átszámítva az alábbi 8 byte-nak felei meg: 
0 byte: 00011000 — $18 — 024 
1 byte: 00111100 — $30 — 060 
2 byte: 01100110 — $66 — 102 
3 byte: O11T11110 — $7E — 126 
4 byte: 01100110 — $66 — 102 
5 byte: 01100110 — $66 — 102 
6 byte: 01100110 — $66 — 102 
7 byte: 00000000 — $00 — 000 165 


1) 


Ez a 8 érték a karaktertár normál nagy A betű részére fenntartott címén foglal helyet. De 
hogyan kapjuk meg az egyes karakterek kezdőcímeit? 

A számítás alapja az egyes karakterek képernyőkódja. Ez az a kód, amely a karakterek 
helyét a képtárolóban meghatározza (lásd CBM 64 felhasználói kézikönyv). 

Innen már viszonylag egyszerű a dolog. Mivel minden karakter 8 byte-ot foglal el, így a 
képernyőkód nyolcszorosát ha hozzáadjuk a karakterkészlet tárolójának kezdőcíméhez 
(normál esetben: D 000), megkapjuk a kívánt címet. 

Képlettel: 


Keresett cím -: kezdőcím -- 8t képernyőkód 
Számítsuk ki mindezt az A betű esetében: 
Az A karakter kezdőcíme: $ D000 -- 81, — $D008 — 53238 


Most már van némi ismeretünk a karakterkészletek előállításáról. A további részleteket 
a SIMON s BASIC egyes utasításainál találhatjuk meg. 


13.1 MEM - a karakterkészlet áthelyezése a RAM-ba 


Formátum: MEM 


Paraméterek: — 
Funkció: A karakterkészlet áthelyezése a $D000 (ROM) címről a $E000 (RAM) címre 
Példa: MEM 


Mint ahogy azt a bevezetőben láttuk, a karakterkészlet eredetileg a $D000-$DFFF címek- 
kel határolt 4K hosszúságú ROM-tartományban helyezkedik el. Mivel az a célunk, hogy 
néhány karakter képét megváltoztassuk, ezt a tartományt a RAM-területre át kell helyez- 
ni. Ezt a feladatot végzi el a MEM utasítás, amely a karakterkészletet a $E000—$EFFF 
(57344-61439) RAM-tartományba helyezi át. Mivel azonban a grafikus tároló is ezen a 
területen ($E000-$EFFF) található, ezért egyszerre karakterkészletet változtatni és grafi- 
kát alkalmazni nem lehet. Ha a fentieket figyelmen kívül hagyjuk, érdekes látványnak 
lehetünk szemtanúi. Ezt szemlélteti az alábbi három sor: 

10 HIRES 6,7 : REM GRAFIKA BE 

29 MEM : REM A KARAKTERKÉSZLET ELTOLÁSA ÉS ÁTMÁSOLÁSA 

30 WAIT 198,255 : REM BILLENTYŰ LENYOMÁSÁRA VÁR 
Tehát először bekapcsoljuk a grafikát, utána pedig karakterkészletet váltunk. Ezáltal a 
teljes karakterkészlet megjelenik a képernyő felső felében. Mivel a karakterkészlet és 
a grafika hasonló felépítésű, a karakterek helyesek maradnak, felismerhetők. 
A program leállítását követően a gép nem tér vissza a szokásos módon a szöveges 
kijelzésre, hanem grafikus üzemmódban marad (lásd még a 12. fejezetet). A beírt szöveg 
csak kis színes négyzetek formájában jelenik meg, mivel a video-RAM (a szín- és 
képtárolói; a MEM-utasítás hatására most a $CC00 (52224) címen található. A SIMON s 
BASIC azcnban grafikus üzemmódban a színtárolót a $C000 (49132) tehát a szokásos 
címen keresi, ezért nincs lehetőség a szín grafikus utasítással való változtatására. Csak 
a CSET vagy az NRM utasítással térhetünk vissza ismét szöveges kijelzésre. 


Összefoglalva a MEM utasítás funkcióit: 
a) Áthelyezi a karakterkészlet-ROM tartalmát a $E000 (57344) RAM címre. 
b) Közli a számítógéppel, hogy a karakterkészlet most ezen a címen található. 
c) Eltoija a video-RAM-ot a $€C00-ra. 
d) Törli a képernyőt. 
e) Áthelyezi a sprite tartományt $0C00-ra. 
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Nézzük az erre vonatkozó példákat: 


P. 88 

1 REM kétE4kkkt 
20REM AE 1 EME 
EM etttktttk 
ia REM 

MEREKENM KARAKTERKÉSZLET :ATHELYEZES 


OLE VUK 


Ü-4NAurjaD 
S a zi gr el 


vm tti 0 e 
ovit 


3. 0 Fa ma mek ek a a há E má ma 1) 
köv) 


5) neem 


713) 2 ( 


REM KEFERHYÜK ÖN 


etek tettet ztekásáeáásátákzsá 
EEEKEREKEE EHE KE EEK RETEK 


238 Aza TŰ 4a 

346 T-ABS(T-2555:REM VALTOZTATAS 8-255 KÖZÜTT 
358 FOR Y-ú TO 7 

364 PÜKE BARCESZtT.T: REM VILLOGTATHSZ 
376 MEXT. v:NEST is 

398 REM 

298 REM S4E€6€EEKEREEEEEEKEKEEEEEK 

449 REM KRRAKTEREK  VALTOZTATAER 

4180 REM SEttttttEEEtEtttekkktkk 

428 RE1 

4390 REM ÜZ 


5 4 
449 FÜKE PAtCHE aa, 201 : 
458 POKE PAtCKSHI1, 
468 FÜKE PRtCEBHZ 
479 PÜüKE PAtCHarI 
499 POKE ERALEHET4 
459 POKE ERAACHETS 
5Aa0 POKE BAtRCLERTE 
Si POKE EARCH347 
32Aa REM 

aza REM 

3490 WRIT 198.255:REM VARAKOZAS EGY GOMB LENYOMASARA 
s54 PRINT CHR$(1472):REM KEPERNYÜTÜRLES 

564 LIST 


Példaprogramunkban először áthelyezzük a karakterkészletet (110. sor), hogy a karakte- 
reket megváltoztathassuk. Ezután megjelenik a képernyőn az A/1 és A/2 karakterkészlet 
(csaknem) valamennyi karaktere. A megváltoztatandó karakter egy rövid időre felvillan, 
majd a program kiírja az új karakter 8 byte-ját (440.—510. sorok, ezekben a sorokban adjuk 
meg az új karakterek byte-jait). A feladat megoldásához már ismertetett címképletet 


alkalmazzuk (a C változó a karakter képernyőkódját jelenti). Az új karakterek definiálását 
.a 13.3 pontban tanulmányozhatjuk. 
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13.2 DESIGN 2 - karakter létrehozása 


Formátum: DESIGN 2, za 

Paraméterek: a módosítandó karakter címe a za — $E000 t B:C címképlet alapján 
(C: a karakter képernyőkódja) 

Funkció: Tetszőleges karakter létrehozása 

Példa: DESIGN 2, $E0001-8r1 


A MEM utasításnál már tapasztaltuk, hogy tetszőleges karaktereket hozhatunk létre. 
Kényelmesebbé teszi a munkát a SIMON s BASIC másik két összetartozó utasítása, 
melyek közül most az elsőt mutatjuk be: 

A csak a MEM utasítás után bevihető DESIGN utasítás kijelöli a megváltoztatandó karak- 
tert, továbbá a programon belüli pozíciójából meghatározza, hogy melyik karakterkészle- 
tet használja fel. 

Ez a következőképpen történik: 

A za paraméterrel közöljük a módosítandó karaktert, vagyis a karakterminta helyét a 
karakterkészlet tárolójában. Ehhez a már ismert 


cím — kezdőcím 1 8trképernyőkód 


összefüggést használjuk. Minthogy egy korábbi MEM utasítás hatására a karakterkészlet 
átkerült a $E000 (57344) címre, a képletben szereplő kezdőcím értéke $E000. A képernyő- 
kód értékét a megváltoztatni kívánt karakter határozza meg, értéke a CBM 64 felhasználói 
kézikönyvből kereshető ki. 

Az egyenlet az A betűre a következő: 


za — $E0001t 8r1 — $E008 
Az $E000 helyett alkalmazhatjuk annak decimális megfelelőjét is. A DESIGN utasítás után 


közvetlenül be kell írni az ún. mintasorba az új karakterminta kódjait. Ellenkező esetben 
"BAD CHAR FOR A MOB" hibajelzést kapunk. A továbbiakat a 13.3 pontban találjuk meg. 


13.3 0 a karakterminta tárolása 


Formátum: (0... karakterminta. .. 
Paraméterek: karakterminta (lásd alább) 
Funkció: a karakterminta tárolása 
Példa: lásd alább 


A karakterek megváltoztatásának kulcs-utasításához értünk: a MASTER SPACE vagy 
ADD jelhez. Funkcióját tekintve megfelel a normál BASIC DATA utasításának. Mindig a 
sor elején áll, és adatok sorozatát, jelen esetben a megváltoztatandó karakterek definí- 
cióját jelöli. Működése a következő: 

Mint tudjuk, minden karakter egy 8 XxX 8-as pontmátrixból tevődik össze. Ennek megfelelő 
a karakterdefiníció is. A karakterhez tartozó 8 sort külön-külön BASIC sorként adjuk be, 
ahol mindegyik sor egy karaktersor 8 pontjának mintáját rögzíti:(normál nagy A betű) 


100 ...BB... 
110. .BBBB. . 
120 .BB..BB. 
130  . BBBBBB. 


A karakter minden bekapcsolt pontjába egy-egy B betűt, míg az üres helyekre pontot kell 
írni. Így már a BASIC program listájában megjelenik a betű nagyított képe (a 14. fejezet- 
ben látni fogjuk, hogy a sprite-okat is hasonló módon definiáljuk). 

A DESIGN utasítást közvetlenül a definíció előtti sorban kell elhelyezni. Ez határozza meg 
a módosítandó karakter címét: 


90 DESIGN 2, $E000 £ Cr8 


ahol a C a képernyőkód. 
Legelőször azonban a karakterkészletet kel! áthelyeznünk: 


80 MEM 


Ezzel a karaktert újradefiniáltuk (ha pl. a C-t 1-re választja, természetesen semmi nem 
történik, hiszen az A-karakter éppen ilyen alakú). 

A mintasorban a pontok helyett szóközöket is használhatunk, viszont a két szélső hely 
közül legalább az egyiken pontnak kell állnia, különben a "BAD CHAR FOR A MOB" 
hibaüzenetet kapjuk éppúgy, mintha valamelyik sorban hibás, vagy túl sok karakter 
szerepelne. 

Az utasítás segítségével tehát különleges karaktert, sőt speciális karakterkészletet hoz- 
hatunk létre. Minthogy azonban ez meglehetősen idő- és memóriaigényes, ezért jobb, 
ha ilyen célra külön karaktetrkészlet-előállító programokat alkalmazunk és a komplett 
karakterkészletet közvetlenül olvássuk be a memóriába. Másik módszerként alkalmazha- 
tó az ún. OVERLAY eljárás. Ennek az a lényege, hogy először az új karakterkészletet 
előállító programot töltjük be és miután ez lefutott, automatikusan hívja a tulajdonképpeni 
programot. Ehhez persze tudnunk kell, hogy az utóbbi milyen hosszú. Ha rövidebb, mint 
a karakterkészletet definiáló program, akkor nincs probléma és a 


200 LOAD" programnév" 8 


sor elvégzi a beolvasást, valamint az automatikus indítást. 
Abban az esetben, ha hosszabb, akkor a 


190 POKE 45,AD-int (AD/256)r256 
195 POKE 46,  -int (AD/256) 


utasításpárral meg kell adnunk, hogy mekkora lesz a főprogram hossza. Az AD cím a 
BASIC tárolónak azt a címét tartalmazza, ameddig a főprogram terjed. Ez a cím SIMON s 
BASIC-ben a következő képlettel állapítható meg: 


AD — 30720—FRE-(0) 5801 


Természetesen ez az összefüggés csak akkor eredményes, ha a program a gép memó- 
riájában van. Most már ezt a konkrét címet kell az első programba beépíteni. Érdekes- 
ségként nézzük meg a fenti képlet magyarázatát: A SIMON s BASIC betöltésekor a gép 
memóriájában 30720 szabad, programozható byte marad. A FRE(0) a program betöltése 
után maradó szabad memóriaterületet adja meg byte-okban. Ehhez az értékhez még 
hozzá kell adni a BASIC-program kezdőcímét, ami normál esetben $801 (decimálisan 
2049), és máris rendelkezésünkre áll a BASIC programunk címe. Tehát a programba a 


180 AD— 100 


sort kell beírni, ha a programunk 100 byte terjedelmű. Ennyi ismeret röviden elég is lesz 
az ún. OVERLAY eljárásról, ami persze ennél összetettebb. Az viszont tény, hogy segítsé- 
gével több BASIC programot is összekapcsolhatunk. 

Nem jelent nagy problémát, ha a leírtakból nem értett meg mindent. Ha mélyebben meg 
szeretne ismerkedni a fenti gondolatmenettel, akkor javaslom, hogy szerezzen be egy 
olyan könyvet, amely az ilyen és ehhez hasonló profi programozási fogásokat részlete- 
sen ismerteti. Elsőként "A BASIC programozás magasiskolája C64-esen" c. DATA 
BECKER-NOVOTRADE kiadványt ajánlom. 

A továbbiakban térjünk rá a mintaprogramunkra: 
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. 89 


REM-k DE 


1 Ül EE zSz, 


P 
1 FEM EZESEEEEEEEEEEEEE 


3 REM HEttttttrtktkkkkb 


188 


REM 

MEM:REM A KARARKTERKESZLET ATHELTEZESE 
PRINT:REM SÜREMELES 4 
CENTRE"EZUTAN MAR MINNEN SZOVEG":PRINT 
CENTRE"AZ UJ KARAKTERKESZLETTEL ":PRINT 
CENTRE" IRHATO !":PRINT 

PRINT:REM SÜREMELES 

CENTRETH B €.DE" 


A PALUSE 5 


REM 
REM EtEtEEKEFETEK ETET kk 
REM £ KARAKTERDEFIMICIO §£ 
REM Ett4sE5Ekkdt tet kk kekk 
REM 
DESIGN z. $EMmM41€3:RIM A 
(la , EPEEBPE 

5.5 BB... BB 

.- PREEBBEE 

.: BBBEBBE 

5. BB. .BB 

:.BE..EB 

. PEE..BE 
ESIGN 2. 3EMA042$8:REM B .- 

- EREBBRE 

és. BB... BB 

s BB... BB 

.: EBBBEEB 

. . BB..BB 

a u BB. BB 

, EBEBEBEB 
ESIGN 2. $E60845X8:REM 

: PEEBEBEE 

a . BB... BB 

sa BBisos 

ve BB... 

. BB... . 

s . BB... BB 

.- PEEPBBBBB 


a 5 a (a má a TH (a ima fat ha) fa ra id ia I má 2 12 hm a a a) 
Lap 


irni 


DESIGN 2. $E90044X9:REM D 
: EEBBBBE 
a . BB..EB 
..BB..EB 
a. PB..EE 
a . BB..BB 
s s BB. . BB 
. E.BEBBB 


ESIGN 2. $E00045$3:REM E 
.: BEBBBBERE 
: . FB. .BB 
. BB... . 
: .: BRBERB. 
vs BBéjesa 
- . PE..BB 
: BEEBBBE 


DTAMADIDHÁANHIA: mm ím (2 (a (a (a a (a (a 


AUSE 197 


708 FRIMT CHR$f147.:REM KEPERNTÜTÜRLES 

TA" GENTRESÉ MET UTHSETÁSSÁLEMITNDEN E SERENMIT 

72 CEMHTRE"YISSZARLLITHAT !" i 

720 PAUSE 14 

v483 MEM 

758 PRINT:REMH SOREMHELES 

760 CENTRE"LATJA 7" 

crasPETMT:EKINT 

CSSEHTRES HB e LES 

a WAIT 198.255"REM VARAKOZAZ EGY BILLEMTYI LENYOMASARH 


13.4 CSET 0/1 — karakterkészlet váltása 


Formátum:  CSET 0 vagy CSET 1 


Paraméterek: — 
Funkció: Átkapcsol a második karakterkészletre 
Példa: CSET 0 


A CSET utasítás CSET 2 változatát már a 12.2.4 pontban megismertük. Itt a grafikát 
kapcsolta be anélkül, hogy előtte törölte volna a grafikus tárolót. Most a CSET utasítás 
két újabb változatával ismerkedünk meg, melyek szintén könnyen megérthetők. A CSET 0 
teljesen megfelel az NRM utasításnak (lásd részletesen a 9.3.3. fejezetben), azaz néhány 
egyéb feladat mellett bekapcsolja a nagybetű/grafikus jelkészletet. Ezt a részfeladatot, 
mint tudjuk, a 


PRINT CHR$(142) 


utasítással helyettesíthetjük. 

A CSET 1 utasítás segítségével aktivizálható a kisbetűs/nagybetűs karakterkészlet úgy, 
hogy közben a többi funkciója (a grafika, a EXTENDED COLOUR üzemmód és a MEM 
utasítás kikapcsolása) is megmarad. A fenti utasítás a 


PRINT CHR$(14) 


sorral helyettesíthető. 
A jobb megértés érdekében nézzük a következő példát: 


. 90 

REM $t4ttkittétkbkkkkk 

REN ENS ES ss E EK 

MESEL EEVEVEEEEEEP EKE 

REM ( 

PRINT CHR$T147.:REM KEPERNYOTÜRLES 
CSET A:REft HAGYBETU-/GRBFIKUS JEL 
CENTRE" JELENLEG A NAGYBETU--/GRAFIKI 
FRIHT 

CENTRE" JELKESZLET WZEMMONDERH VAGYUNK, 

ERINT REM SÜREMELES 

PALSE S 

CENTRE"AMIT ROGTON MEGVAÁLTOZTHATUNK." 

FRTHT FRIFET 

PALSE 5 

CENTRESETSTELEE Es 

KEI SE 

CSET 1:REM KIS-/NAGYBETUS UZEMMOD 

WAIT 19£.2552:REM VARAKOZAS EGY COME LENYÜHASSRA 


1 age en a 3 3 aa a 7 


73 
5 a 


fü B) Fe a je jsa ha há s A et FMJ 7 
MORD G 


ra ma agy tő Ce NVÜN A da éj ear ED 
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13.5 Elienőrző kérdések 


18 


Mely áilítások igazak a MEM utasításra? 


a) A MEM utasítás kikapcsolja a grafikát. 

b) A MEM utasítás átmásolja a karakterkészletet a $E000-tól kezdődő tartományba. 
c) A grafika és a saját karakterkészlet egyszerre nem használható. 

d) A MEM utasítás hatását az NRM és a CSET 0 utasítás feloldja. 

e) A MEM utasítás hatását a CSET 2 és a CSET 1 utasítás feloldja. 


Melyik állítás vonatkozik a DESIGN 2 utasításra? 


a) A DESIGN 2 utasítás kikapcsolja a grafikát. 
) A DESIGN 2 utasítás a karaktermintát dolgozza fel. 
A DESIGN 2 utasítást követő paraméter megadja a karakterdefiníció címét. 


b 
c) 
d) A DESIGN 2 utasítás grafikus üzemmódban nem használható. 
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14. FEJEZET 
SPRITE-OK (MOB-OK) 


A Commodore 64-es egyik különlegessége, hogy sprite-okat (vagy más néven MOB-okat 
— Movable Objekt Blocks — mozgó alakzatok) képes előállítani. A sprite-ok olyan önálló, 
kisméretű, grafikus figurák, melyek egymástól és a képernyő többi részétől függetlenül 
mozgathatók a szöveges vagy grafikus üzemmódú képernyőn. 
Egyidőben 8 sprite lehet a képernyőn. A sprite-ok színe, nagysága, prioritása szabadon 
változtatható és lehetőség van a képernyővel és egymással való ütközésük érzékelésére. 
Mindezen funkciók könnyen programozhatók a VIC (Videocontroller 6567) és regiszterei 
segítségével. A SIMON s BASIC megkönnyíti a sprite-ok kezelését, használatával az 
összes funkció könnyen és áttekinthetően programozható. 
Most tekintsük át a sprite-ok felépítését: 
Minden sprite 504 pontból áll, arnelyek külön-külön be-, ill. kikapcsolhatók. Az 504 pont 
egy 24 x 21-es pontmátrixban helyezkedik el, ami azt jelenti, hogy egy sprite 24 pont 
széles és 21 pont magas. Ezen a tartományon belül a legkülönbözőbb ábrák és figurák 
alakíthatók ki. A sprite felépítése a következő ábrával szemléltethető: 
012345678901234567890123 


A felépített sprite-ok pontos tárolásának a kérdésével nem kívánunk foglalkozni, mivel 
ez a SIMON s BASIC-ben nem játszik szerepet. Itt a sprite-okat nagyon egyszerűen 
hozhatjuk létre. A vázolt területen belül kedvünk szerint alakíthatjuk ki a figurákat és 
pontonként 16 színből válogathatunk. 

Azonban nem minden sprite épül fel 24 x 21 pontból, csak a nagyfelbontásúak. A többszí- 
nű sprite-ok a többszínű grafikához hasonlóan alakíthatók ki. X-irányban feleakkora 
felbontásúak, tehát soronként 12 duplaszéles pont helyezkedik el. Cserében viszont (a 
háttérszínnel együtt) 4 szín szerepelhet bennük, míg a finomfelbontású sprite csak 2 színű 
lehet. A négy szín a VIC különböző regisztereiben tárolódik (lásd CBM 64 felhasználói 
kézikönyv). Meg kell azonban említeni, hogy csak a 2. szín lehet minden sprite-nál 
különböző, a többi szín (az 1., a 3. és a háttérszín) valamennyi sprite esetében azonos 
lesz, mivel ezek azonos regiszterből származnak. A CBM 64 felhasználói kézikönyvében 
leírtakkal ellentétben MULTICOLOR üzemmódban is használható mind a 16 szín. 

A sprite alakján és színén kívül még néhány más jellemzőt is programozhatunk. Például 
kétszeresére nagyíthatjuk az alakzatot x, y vagy mindkét irányban, ill. megadhatjuk a 
sprite/háttér prioritást. A sprite-ot helyezhetjük a többi grafika elé, ill. mögé. Az előbbi 
esetben a sprite a képernyőn található grafikák előtt, az utóbbi esetben ezek mögött 
mozog. Prioritás állapítható meg a sprite-ok között is, amit a sprite számával adunk meg 
(a nyolc lehetséges sprite sorszáma: 0-7 között van). A nagyobb sorszámú sprite-ok 
prioritást élveznek a kisebb sorszámúakkal szemben. Ezzel a módszerrel rendkívül 
egyszerűen lehet térhatást előidézni. 

De ezzel még mindig nincs vége. A Commodore 64 még sok csemegét tartogat a 
hozzáértők számára. Képes arra, hogy a sprite háttér, ill. sprite ütközéseket érzékelje. 
Ehhez szintén különböző VIC regisztereket használ, amivel azonban megint nem kell 
foglalkozni, mert a SIMON s BASIC mindent elintéz. Néhány fontos tudnivalóra az utasítá- 
sok (DETECT és CHECK) ismertetésénél hívjuk fel a figyelmet. Lényeges még megemlíte- 
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ni, hogy a háttér sprite, és sprite ütközések között is differenciálhatunk. Az utóbbi esetben 
még azt is eldönthetjük, hogy a nyolc sprite közül melyek ütközhetnek össze. 

Röviden szólni kell még a sprite-ok tárolásáról. A sprite tárolásakor a számítógép a 
RAM-ot 64 byte-os csoportokra, ún. blokkokra osztja, amelyek mindegyike sorszámmal 
rendelkezik. Így pl.: a tároló első 64 byte-ja (0—63 közötti címek) a nulladik számú blokk, 
stb... Ha egy sprite-ot definiálni akarunk (ami — mint látni fogjuk — a DESIGN utasítással 
realizálható), akkor ezt először egy ilyen blokkban kell elhelyezni. A sprite ábrázolásakor 
hivatkozni kell a tároló címére. Így megtehetjük azt is, hogy mind a nyolc sprite-hoz 
ugyanazt az alakot, méretet, színt rendeljük, ha a különböző sprite-számokhoz ugyanazt 
a tárolóblokkot jelöljük ki. A blokkszámozásnál csak a 0 és 255 közötti értékek állnak 
rendelkezésére, ami azt jelenti, hogy figurákat csak 255 x 64 -— 16 384 byte-ban helyez- 
hetjük el. Azt, hogy ez a 16K melyik memóriacímtől kezdődik, a video-RAM (képernyőtá- 
roló) helyzete szabja meg, ami a SIMON s BASIC-ben a következő: 


Üzemmód Tárolócím 

normál szöveges üzemmód 0—16383($0000—$3FFF) 
új karakterkészlet 49152—65536($C0O00-$FFFF) 
grafikus üzemmód 49152—65536($C0O00—$FFFF) 


Ebből következik, hogy ha a grafikus és szöveges üzemmódban egyszerre dolgozunk, 
a sprite definíciók a tár eltérő tartományaiban lesznek, bár a blokkszámozás nem válto- 
zik. Ha a két üzemmódot felváltva használjuk, vegyük figyelembe, hogy a szöveges 
kijelzésre a tárba bevitt sprite grafikus üzemmódban nem, vagy csak teljesen értelmetlen 
formában jelenhet meg. Ennek oka az, hogy a szóban forgó blokkért felelős tártartomány 
a sprite definíciót nem tartalmazza. Fordítva ugyanez érvényes. 

Ilyen esetben az a megoldás, hogy ugyanazt a sprite-ot még egyszer átviszi a grafikus 
blokktartományba, vagy a grafikus üzemmódra való átváltáskor egyszerűen kikapcsolja. 
A blokkok kiválasztásánál még egy fontos dolgot kell szem előtt tartani: nem használha- 
tók a már foglalt blokkok (pl.: nulláslap stb.). Most pedig nézzünk meg néhány lehetséges 
tárolóhelyet a blokkok számára: 

Szöveges üzemmód 


Blokkszám Címek Megjegyzések 
13-15 832—1023($0340-—$03FF) : Korlátozás nélkül használható 
64—-255 4096—16383($1000-$3FFF) hosszú BASIC programoknál vigyázat 


Grafikus üzemmód 


16-63 50176—53247($C400—-$CFFF) DATA BECKER IEC busszal (S-változat) 
csak a 47. blokkig 


Új karakterkészlet 


16-47 50176—52223($C309—$CBFF) Korlátozottan használható 
195-255 61449-65535($F000—-$FFFF) Korlátozás nélkül használható 


Vigyázzunk, ha a C-oldalt használjuk (16-63 blokkok grafikus üzemmódban és új karak- 
terkészlet alkalmazásakor), ugyanis itt található a SIMON s BASIC néhány közbenső 
tárolója (többek között a funkcióbillentyűk tartalma). Elképzelhető, hogy ebben a tarto- 
mányban néhány olyan puffer is elhelyezkedik, melyek tartalmára, bizonyos funkciók 
kiesésekor lesz szükség. 

Tehát, ha ezzel a tartománnyal akarunk dolgozni, akkor az első indítás előtt tároljuk a 
programunkat. Ezt egyébként érdemes máskor is megtenni, mivel a SIMON s BASIC 
hajlamos az összemásolásra. 
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14.1 A sprite-ok definiálása 


14.1.1 DESIGN 0/1 


Formátum:  " DESIGN 0, kct b:r64 vagy DESIGN 1, kc-t b:r64 
Paraméterek: 0 — nagyfelbontású sprite 

1 — többszínű sprite 

kc — a video-RAM kezdőcíme 


szöveges üzemmód: kc—0 
grafika: kc— $C000 
új karakterkészlet: kc— $C000 
b — a tárolóblokk száma 
Funkció: a sprite definíció átvétele a memóriába 
Példa: DESIGN 0, $C000X13:r64 


Bizonyára emlékszünk még a DESIGN 2 utasításra a 13.2. pontból, amivel új karaktert 
tudunk meghatározni szöveges üzemmódban. 

A DESIGN 0 és DESIGN 1 utasítás teljesen analóg módon működik. A DESIGN 0/1 
utasítással a megtervezett sprite-ot vihetjük át az ún. mintasorból (ADD sor; lásd 14.1.2) 
az illető memóriatartományba. Az utasítás mindhárom változatának közvetlenül a minta- 
sor előtti sorban kell állnia, ha a "BAD CHAR FOR A MOB" hibajelzést el akarjuk kerülni. 
A 0 és 1 paraméterrel a sprite típusát határozhatjuk meg: 


-— 0 esetén FFB 
- 1 esetén többszínű sprite. 


A második és harmadik paraméter, a 13.2 ponthoz hasonlóan azt a memóriatartományt 
jelöli ki, ahová a sprite definíció kerül. 

Jelen esetben "kc" a 0. blokk címét (a videocím tartomány báziscímét), b pedig a kijelölt 
blokk. számát jelenti. További részleteket a 14. fejezet bevezetőjében, vagy a 14.1.2 
pontban találunk. 


14.1.2 0 - a sprite definiálása 


Formátum:  (X...... mintasor..... 
Paraméterek: mintasor — sprite — definíció 
pont(.): üres pont 


B: pont az 1. színnel 
Hg 6; pont a 2. színnel 
D: pónt a 3. színnel 
Funkció: egy sprite definiálása 
Példa: ...B..BBB...B...B....B.B.B. stb. (21 sor) 


A 13. fejezetben már ezzel az utasítással is találkoztunk, ugyanúgy, mint a mintasor 

jelével, amit az új karakter előállításához használtunk. A (2-jel feladata most az, hogy 

bevezesse a sprite definíciót tartalmazó mintasort. Mint a bevezetőben már említettük, 
kétféle sprite létezik: a finomfelbontású és a többszínű. Ezeket természetesen különböző- 
képpen kell definiálni: 

- A finomfelbontású sprite (FFB) esetében egy 24 x 21-es pontmátrixból állítjuk össze a 
sprite-ot. A SIMON" s BASIC-ben tehát egy finomfelbontású sprite összesen 21, egyen- 
ként 24 pontot tartalmazó sorból építhető fel. A bekapcsolt pontokat B-vel, míg az 
üreseket (melyek a háttér színét veszik fel) ponttal jelöljük. 

— Többszín( sprite esetén az alapszín mellett még két olyan színnel rendelkezünk, amely 
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valamennyi sprite-ban előfordulhat. Ezeket a színeket a C és D betűkkel szimbolizáljuk. 
Igaz, így soronként már csak 12 pont áll rendelkezésünkre, mivel a vízszintes felbontás 
a felére csökkent. 
A definiálás módja a példaprogramon tanulmányozható. A betűk alkalmazásánál még 
egy dologra kell figyelnünk: 
A finomfelbontású sprite-ok a B-vel jelölt pontok színét a MOB SET utasítás paraméteré- 
ből veszik. c 
A többszínű sprite-ok esetében a MOB SET utasítás a C-vel jelölt pontokra vonatkozik. 
A kétféle sprite-ra az alábbi hozzárendelés szükséges: 
— finomfelbontású sprite-ok 


jel színkód Meghatározó színutasítás 
; 0) háttérszín 

B al MOB SET 

— többszínű sprite-ok 

jel színkód Meghatározó színutasítás 
É 0 háttérszín 

B 1) CMOB 

c 2 MOB SET 

D 3 CMOB 


Ha véletlenül eltérünk a helyes formátumtól és más betűket vagy jeleket használunk 
(bizonyos esetben a szóköz kivételével; Id. 13. fejezet), a sorokat az engedélyezettnél 
hosszabbra választjuk, vagy a DESIGN utasítás és a mintasorok közé egy újabb BASIC 
sort írunk, akkor a számítógép a "BAD CHAR FOR A MOB" hibaüzenettel leáll. Igyekez- 
zünk tehát a helyes Írásmódot betartani. 
Példa: 

P. 91 


1 REM SEMEMeMkMedke Neee keretezte elenk 

2 REMXKGZDESIGNEK 

3 REM HeleNedee teged tetette kb 

198 REM 

1198 DESIGN 1.,14464 

129 8 ....BBBBB. . . 

130 6 ..BBB...BBB. 

148 8 .BB.CC.CC.BB 

159 6 .BB...C...BB 

169 ő .BB...C...BB 

178 6 ..BPEECCCBBB. 

198 8 ....BBBBB.. . ő 
198 8 .B...DDD.... 

290 € .BE..DDD.... 

219 8 .ERPBDNDBE.. 73 


340 REM KIEGEZZITES 
358 REM ESEEEEEEEKK 

360 REM 

s7a CüLÜ lg 9.5 

a8ú MOR SET 1.14.§.M,1 

99 CMOB 7.E 

409 MMOBR 1.9.9.780. 205. 2. 2AM 
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Példánknak mindössze az volt a célja, hogy megismertesse a kétfajta sprite definiálásá- 
nak módját. 3 

Ahhoz azonban, hogy a sprite a képernyőn is megjelenjen, még egy sor utasításra van 
szükségünk. Ezeket az utasításokat a 330. sortól mindenféle magyarázat nélkül egysze- 
rűen hozzákapcsoltuk a programhoz. 

Egyelőre fogadjuk el ezeket az utasításokat, használatukra később visszatérünk. 


14.1.3 MOB SET - a sprite jellemzői 


Formátum: MOB SET nb. sz,p,a 
Paraméterek: n -— a sprite száma (0-7) 
b — a sprite-ot tartalmazó blokk sorszáma (0-255) 
sz — a sprite színe 
finomfelbontású: B betű 
többszínű: C betű 
p - sprite-háttér prioritás 
p-0 sprite a háttér előtt 
p-—1 sprite a háttér mögött 
a — a sprite típusa 
a-—0 finomfelbontású 
a— 1 többszínű 
Funkció: a sprite jellemzőinek meghatározása 
Példa: MOB SET 0,13,7,1,0 


Mint ahogy a bevezetőben már olvastuk, a sprite bizonyos jellemzői (szín, nagyság, ...) 
a definíciótól függetlenül utólag (vagy előzőleg) is kijelölhetők vagy megváltoztathatók. 
Ezt a feladatot részben a MOB SET utasítás végzi, amely mint látjuk, nem szűkölködik 
paraméterekben. Egy valamit azonban meg kell jegyeznünk: ez az utasítás a sprite-ot 
nem kapcsolja be, tehát ezzel az utasítással a sprite nem vihető a képernyőre. 


Most pedig lássuk részletesen az egyes paramétereket. 


Először is az n paraméterrel a sprite számát kell meghatározni a nyolc lehetséges közül. 
Mint tudjuk, minden sprite-hoz tartozik egy 0 és 7 közötti sorszám, ami egyben a prioritá- 
sokat is meghatározza. Ezt a számot minden sprite utasításban meg kell adni. 
A második paraméter (b) kijelöli annak a memóriatartománynak a sorszámát, amelyben 
a sprite elhelyezkedik. Ezt előzőleg a DESIGN-utasítással és a (I-jellel definiáltuk. 
A MOB SET utasítás a mintát hozzárendeli a megfelelő sprite számhoz, így a későbbiek- 
ben elég a sprite számát megadni, és ezzel már meghatároztuk a sprite-ot. Így az is 
elképzelhető, hogy több sprite számot rendelünk egy minta-bilokkhoz. Ezzel elérhetjük, 
hogy több sprite-nak ugyanaz legyen az alakja. 
Az sz paraméterrel a sprite színét határozhatjuk meg az ismert 0-15 kódokkal. 
A p paraméter a sprite háttér prioritást állítja be. Ebből következően csak két értéke lehet: 
0 vagy 1. Ha értéke O, a sprite a képernyőn található ábrák előtt helyezkedik el, míg ha 
értéke 1, mögöttük. 
Az utolsó paraméter (a) szabja meg a sprite típusát. 

a-—0 finomfelbontású, 

a—1 többszínű sprite-ot használunk. 
Az utolsó két paraméter esetében az egynél nagyobb érték után a számítógép automati- 
kusan 0-át állít be. Töltsük be a mintaprogramot és mielőtt elindítjuk, listázzuk ki. Erre 
azért van szükség, hogy a sprite megjelenésekor a képernyő ne legyen üres. (Természe- 
tesen egyéb szöveg is megfelel.) 
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P. 92 


i REM áEktkiktkkktkktrkkkk 

SRE TÉREN AB esztet Ste 

3 REM ESEZRESEEEEEEKKEB 

1am REF 

119 COLOR 0.ú:REM A KERET ES A HHTTER FEKETE 

128 DESIGN A.13$§E£4:REM MOE A 12. ELÜKKERN 

1398 6 ; 

149 

1599 8 

160 6 

Í7rú B . 

j tti 2 Kaló C.NAGASÉSES fs 

199 6 . TEÉBBZ SEB BB ls 

SAM ON aszt aa os ab BG a Bt éa Alatt s 

210 (8 as BBez sza BEBBBBS 2 sző A DBa 

22 fa . ERBEEPRBPEBBBBRBPRBERBPRBBE 

230 8 . REBBBEBEBEPEEBPBEBBEBEBBE 

AA sze BB v-aa a BEBBEBBe o s ző a PB. 

ZAEVÜS se azás Sze BBSBEL BB css sses 
(d etétesá s B Bos Perés BBS stmatérő s 
MS zA set B Ba EBB es a Bs éa éget 
ILÉKEFEZÉGE BB ató Bass áá Bat ateá 
Ae EE KAY NOK TK AL 
ÜL ÉsAa zám a. Blsl s BBEBVNéséZe út 
fa S BEBIB als énis vasa 


a. 199, 189,3.Aa:REM A MOR MEGJELENIK A KEFERHYON 
.12.X.0.6:REM JELLEMZOK MHEGHATAROZASA ES SZINVALTAS 


290 NEXT X 

46a COLOR 2.2 

418 REM 

420 FOR X-1 TO E 

49a MOB SET 8.13.7,1.8:REM MOB A KARAKTEREK MOGOTT 

44A PAUSE 2 

45a MOB SET 8,13.7.ú.ü:REM MOB A KARAKTEREK ELÜTT 

46ú PAUSE 2 

470 NEXT 
Ebben a programban is találkozunk az MMOB-utasítással, amely a sprite tényleges 
megjelenítését szolgálja. A későbbiekben részletesen is fogjuk ismertetni. 


14.1.4 CMOB —- MULTICOLOR sprite színei 
Formátum:  CMOB SZ1,5Z3 
Paraméterek: SZ1 — a többszínű sprite 1. színe (0—15) (B betű) 

SZ3 — a többszínű sprite 3. színe (0—15) (D betű)- 
Funkció: a többszínű sprite mellékszíneinek kiválasztása 
Példa: CMOB 2.7 j 
A CMOB utasítás a MOB SET kiegészítő utasítása, ami kizárólag a többszínű sprite-okra 
vonatkozik. A többszínű sprite-ok három színnel dolgoznak, ellentétben a finomfelbontá- 
sú sprite-okkal. A két mellékszín megadását szolgálja ez az utasítás. Az SZ1 paraméter- 
rel a sprite mintasorában B betűvel jelölt pontok, az SZ3 paraméterrel pedig a D betűvel 
jelölt pontok színezhetők ki. A sprite fennmaradó (2.) színét, azaz a C-vel jelölt pontokat 
a MOB SET utasítás definiálja. Fontos még tudnunk, hogy ezek a paraméterek, színössze- 
állítások egyszerre érvényesek mind a nyolc sprite-ra. 
Egyedül a C betűvel jelölt pontok kaphatnak sprite-onként eltérő színeket. 
Az utasítást az előző példákban már alkalmaztuk. 
Ismétlésként nézzük át még egyszer ezeket a programokat. 
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14.1.5 Ellenőrző kérdések 


Lássunk végül néhány tesztfeladatot, melyek remélhetőleg nem okoznak nehézséget. 


ag 


Melyik utasítás írásmódja helyes? 


a) DESIGN 0 
b) MOB SET 1,15,3,0,0 
c) DESIGN 0,832 

d) CMOB 2.3 


. Mit kell figyelembe venni a DESIGN utasításnál? 


a) A DESIGN csak a sprite ábrázolásához használható. 

b) A 1383-as blokk más memóriatartományhoz tartozik a grafikus és szöveges üzem- 
módban. t 

c) Az első paraméter a sprite nagyságát határozza meg. 

d) Az utasítás és az első mintasor között nem szerepelhet más BASIC-sor. 

e) Nem használható többszínű sprite-ok esetén. 


. Mit határoz meg a MOB SET utasítás első két paramétere? 


a) Rögzítik a sprite típusát (finomfelbontású vagy többszínű) és meghatározzák a 
prioritást. 

b) A megnevezett blokkból származó definíciót az utasítás hozzárendeli a megadott 
számhoz. 3 

c) Az első paraméter a képernyőn ábrázolja a sprite-ot. 

d) A második paraméter megadja a sprite alakját. 
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14.2 A sprite-ok vezérlése 


14.2.1! MMOB - megjelenítés és mozgatás 


Formátum: MMOB n.x1,y1,x2,y2.m,v 
Paraméterek: n — a mozgatni kívánt sprite száma (0—7) 

x1 — a kezdőpont x-koordinátája (0-511) 

y1 — a kezdőpont y-koordinátája (0—255) 

x2 — a végpont x-koordinátája (0—-511) 

y2 — a végpont yv-koordinátája (0—255) 

m -— a sprite mérete (0-3) 

v — a sprite sebessége a két végpont között (0—255) 
Funkció: egy sprite megjelenítése és mozgatása a képernyőn 
Példa: MMOB 1,100,50,200,160,0,10 


Eddigi ismereteink alapján már sokat tudunk a sprite-okról, de bosszantó volt, hogy nem 
láthattuk a képernyőn munkánk eredményét. Nos, a MMOB ezt a hiányosságot küszöböli 
ki. Segítségével nemcsak kijelezhetjük, hanem keresztbe-hosszába mozgathatjuk, pör- 
gethetjük... stb. a figuráinkat. Alapfunkciója a sprite megjelenítése a képernyőn. 
Kijelölhetjük azt a pontot, ahol a sprite-nak először fel kell tűnnie (x1, y1 pontpár) és azt 
a pontot is, amelyik felé haladnia kell (x2, y2 pontpár) közvetlenül a megjelenés után. 
A koordinátákhoz néhány megjegyzést kell fűzni. 

Ezek a koordináták nem azonosak az eddigi, a grafikusképernyőnél megszokott koordi- 
nátákkal. A MMOB utasításhoz megadott koordináták a sprite bal alsó pontjára vonatkoz- 
nak. Ha tehát a sprite-unkat a képernyő bal felső sarkába akarjuk elhelyezni, akkor az 
x- 20, y—30 koordinátákat kell megadnunk. Ez a koordináta-transzformáció az egész 
képernyőre érvényes. 

Azt is megtehetjük, hogy képernyőn kívüli koordinátaértékeket adunk meg a sprite 
számára. Az ütközésekre ebben az esetben is figyelni kell. Ha a sprite-ot nem akarjuk 
mozgatni, akkor egyszerűen adjunk azonos értékeket a két pontpárnak. Ekkor a kezdő- 
és végpont egybeesik, és a sprite mozdulatlan marad. A sprite a kezdőponttól (x1, y1) 
a végpontig (x2, y2) halad a képernyőn lévő alakzatokon, szövegen keresztül. Mozgási 
sebességét az utolsó paraméter (v) határozza meg: 0 és 255 között. Minél kisebb a v 
értéke, annál gyorsabb lesz a sprite. A v— 255 esetén a sprite csigaként vánszorog, míg 
v: 0 értéknél vadászrepülőként süvít át a képernyőn. 

De álljunk csak meg egy pillanatra. Valamit elfelejtettünk: 

Az m paraméterrel módunk van a sprite méretének meghatározására is. Mint tudjuk, 
minden sprite nagyítható mindkét irányban. 

Az m nagyítási lehetőségei a következők: 


Nagyítási 
m Nagyítás tényező Pontmátrix 
0 nincs 1x1 24x21 
3 x-irányú 2x1 48 x 21 
2 y-irányú 1x2 24 x 42 
3 x,y-irányú 2x2 48 x 42 


Pontmátrix alatt itt a képernyőn megjelenő mártrixot értjük. (A többszínű sprite-ok is ilyen 
méretűek), tehát ezt a téglalapot, amelyet egy sprite maximálisan képes lefedni. 
Az előbb leírtak jobb megértése érdekében iássuk a következő példát: 
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93 


REM $tikkkkttkk 

RE ELM OMT ET BR 

REM $éttétEtkE 

REM 

TOI.OUR A.€:REM A KERET ES A HATTER FEKETE 
DESIGN A.15$E£4:REM MŰE AH 13. BLÜKKERN 


fü , 


I FIR IN): H Hm Et Hi ha E HEJ TÜ KR TF 
faj 


. . BEBEEPEBBBEBBEBEBB. .. 
. BBEBE. PP. BP. BB. BB. BBBBB 


a 

(8 

(c) 

(8 

(E) 

8 

LIESÉER új 

8 . : . BBBBBB, . . , . BBB. BB. . 
(a 

a 

(a . PEBEEBEBBEBEBBBBBEB. . . 
a 

(a 

(8 

E 


35a MOB SET A,13. 
369 MOB SET 1.13. 


EM 6.MOB-SARCA 
EM 1.MOB-FIRÜS 


ej 
am 
77 2 


1 N 
m 


A REM $kikkkkdök 
Aa REM MOZGATAS 
A REM $E4EEkkÉ 
A REM 
42a MMOB A.Aa.9. 209. 209, 1.59:REM NAGYITASX IRANYBAN 
439 MMOR 1.A. 199. 229. 228. A, 78 :REM NORMAL 
448 FAUSE 5 
45 COLOUR 5.3:REM A KERET ES A HATTER BARNA 
Példaprogramunkban két azonos alakú, de különböző színű, nagyságú €5 sebességű 
sprite mozog a képernyőn. Látjuk, hogy a 0-ás és 1-es sprite-hoz a 350., ili. . . 360. sorban 
rendeltük hozzá ugyanazt a blokkot: 


14.2.2 MOB OFF — a sprite kikapcsolása 

Formátum: MOB OFF n 

Paraméterek: n -— a kikapcsolandó sprite száma (0—7) 
Funkció: a sprite kikapcsolása 

Példa: MOB OFF 1 


Miután megismerkedtünk azzal, hogy miképpen lehet egy sprite-ot a képerr(vön megjele- 
níteni, meg kel! tanulnunk természetesen a sprite kikapcsolásának módját is. Ezt a 
feladatot a MOB OFF utasítás látja el, melyhez egyeien paraméterként kikapcsolni 
kívánt spriie számát kell megadni. A MOB OFF utasít. . törli a sprite és a vblokk közötti 
összes hozzérenceiést úgy, hogy a biokk újra felhasz:.álható lesz. Ez az. elenti, hogy 
ha a sprite-ot ujra be akarjuk kapcsoini, vagyis 3 képernyőn megjeleníteni. a megfelelő 
sprite-szárnot a MOB SET utasítással! hozzá keli ren. i valamelyik blokkhoz. 

Többszínű sprite-ok esetén a két kiegészitő szín érvényoen marad, a sprite : jira a MMOB 
utasítással iceleníthető meg. Ezzel az utasítássa! váiik lehetővé a találatot k pott űrhajók 
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eltüntetése a képernyőről, vagy olyan mozgó alakzat ábrázolása, amely tulajdonságait 
folyamatosan változtatja. (Lásd a példaprogramot.) 

A MOB OFF utasítás természetesen helyettesíthető olyan módon, hogy a szóban forgó 
sprite-ot MMOB-utasítással kivisszük a képernyőről és ezáltal eltüntetjük. E módszer 
előnye, hogy a sprite összes paramétere érvényben marad, azaz bármikor és bárhol 
megjeleníthető anélkül, hogy ehhez a MOB SET utasítást ki kellene adni. 

Ha a sprite-ot csak módosítani akarjuk, akkor nem feltétlenül szükséges a MOB SET előtt 
a MOB OFF utasítást is kiadni. 


P. 94 

1 REM kittktrktkkkkktk 

2 FEMEMOUB Ü FF: 

3 REM tieteket 

199 REM 

119 COLOLR 3.8:REM KERET ES A HATTER FEKETE 
129 DESIGN A. 19$64:PEM MŰB A 13.ELÜKKBAM 
138 Cass 


. sss sss PBBBBBBBBB. ...... 
..sss re BB..BB..BE.s.. o. 
öss aa BBessosv aa BBv asz eú 
5. PBBB.. sos... BBBB.... 
. .- e BBBB........BBBB.... 


a 
149 e ...... GR EE e ÉBESREE ÉT 
159 8 ....... DET id ESZE RENZ EB 
TOO s As Bat Biz Ze sa 
ÍZŐ GES zőtss s BABE és aető 
TODT SS zó s Bá Beta tek ezt sie 
19058 ze ésés rre BBBBeés édes só 
299 a ..... SZ BBBBBBS Sz tá 
DÍVA zzz sss BEsss s BBeés és évét 
228 8 ...B...ER...BB.EE...B... 
238 e ...PR..BB..R.BB..BB..B... 
240 e ...BBBBBEBBBBPEBEBEBB. . . 
258 € ..PRBBBE.P.B.B.B.B.BPBE.. 
269 fa .BEBRPP.B.P.R.P.B.EBBEEP. 
270 fi BEBEBBEBEEEBBBEBPEHBEPBBB 
288 8 BR.....BEPBBEBBEBBE.....PE 
290 8 BB.....BP......BB.....ERB 
DDOSAL zta BBasoáttet e Bea vás 
310-A 42: BBBB. rezes e BBBB... . 
329 8 ....BBBB........BBBB.... 
SZABOL S SZE kenetét la ti e életét 
340 REM 
350 DESIGN 0.14k64:REM MOB A 14.BELOKKBAN 
368 8 ...... EZEN OKET 
SZÓT OZ zts ése éllel zésajó ele aha sá 
SO0 A szesz BB masni és BBe sm néa 
BOOM szé ssa Bőszeáte BBz s eu 
490 B sees éti BB. szg BB es széna 
JO Bsz ésa 2 BŐG BB wz e sze 
429 e ..... szeg az BBBBus verses én 
430 A .........BBBBBB........ s 
449 €...... EEBBoeza Bet á st 
ABAZA zs esze BBen a BB BB zet 
ADOM zseni BB 2 B BBez BÉL évése 
470 fa . . . BEBBBBBEPBBBEBBEBBBB. . .. 
490 € ..BBBE.P.B.B.B. B. BBBBB. . 
490 Rf .BBRBPR.P.PR.B.E.BBBBEPB. 
508 e BEBEEB3BBBBBEBPEPEBBBBBB 

e 

e 

e 

e 

e 

[3 
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sra REM 

599 REM $kitttkkEXEP 
298 REM VILLUGTHTAS 
c REM FEEEEFEEFERK 
619 REM 

é29 FOR X—1 fü 18 
OSSZESEN öszes géza 
e4a MOB SET f.12.6.§.§ 

esa MMOB A.299. 189. 29A, 189 .3.A:REM AZ EGYIK MOR BEKAPCSOLASRA 
é6g FÜR vY-1 TŰ 7A:MEXT 7 

Era MOB OFF ú:REM A MŰB KIKAPCSOLASR 

68A REM 

ég MOB SET 4.14.6.8.A 

7a8 MMOB A. 294. 180. 299. 198.2.8:REM A MASIK MÜB BEKAPCSOLAZSR 
719 PAUSE 1 

r2Aa MŰE OFF ü-REM A ME KIKAPCSOLASA 

738 REM 

748 MHEXT A 

729 COLOUR 3.§ 


Példánkban két hasonló sprite definíciót váltogatva villogást, ill. mozgást szimuláltunk. 
A 670. és 720. sor mindig kikapcsolja az előző sprite-ot, így a fentiek szerint el is 
hagyható. 

Ezzel a módszerrel egyhelyben mozgó figurákat is létrehozhatunk. Ha ezeket a figurákat 
több sprite-ból állítjuk össze, akkor rendkívül látványos és mozgalmas dolgokat alkotha- 
tunk. 

Mielőtt önálló programok írásához fognánk, tanulmányozzuk még a következő utasítást 
is. Ezután már semmi akadálya, hogy csodákat műveljünk a képernyőn. 


14.2.3 RLOCMOB - a sprite mozgatása 


Formátum:  RLOCMOB n,x2,y2,m,v 
Paraméterek: n — a mozgatandó sprite száma (0—7) 
x2 — a célpont x koordinátája 
y2 — a célpont y koordinátája 
m -— a sprite mérete (0-3) 
v — a sprite sebessége (0—-255) 
Funkció: sprite ábrázolása vagy áthelyezése a képernyőn 
Példa: RLOCMOB 1,200,160,0,10 


Szintén nagyon hasznos utasítás, amely alkalmas arra, hogy az MMOB utasítással 
megjelenített sprite-ot egy másik pontba áthelyezzük. Itt nincs szükség a kezdőpont 
megadására, egyébként ugyanúgy működik, mint a MMOB (Id. 14.2.1 pontot). 

A RLOCMOB utasítással egy sprite-ot be is lehet kapcsolni: Paraméterei azonosak az 
előzőekben leírtakkal. Ha nincs rá feltétlenül szükség, azt javasoljuk, hogy ne használja 
ezt az utasítást a sprite lekapcsolására, mert ez ilyenkor a bizonytalan kiindulási pont 
miatt átrepül a képernyőn, hogy az előírt célpontba jusson. Ezzel az utasítással most már 
nagyon egyszerűen megvalósíthatjuk akár több sprite egyidejűleg vezérelt mozgatását. 
A SIMON ss BASIC kézikönyv erre nagyon szép példát mutat. Ott a példához minden 
magyarázat megtalálható, úgyhogy ezzel nem is húzzuk az időt, hanem belevágunk a 
közepébe, vagy ahogy a latin mondja: "in medias res" 
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P. 95 
1 REM tttkáttrktktedékekeke ek 


széke ot RL RE AZÉ 

3 FEM kikktzttétkkkkkkk 

108 REM 

11€4 COLOUR 8. U"RETt-A KERET ES B" HATTER FEKETE 
129 DESIGN 6.13$£64:REM MŰR A 17.ELOKKERN 

EA Ze za TR Eás Seal 88 SÉR BBB át azs ata s 

148 a 4.BBB va BbwBBuzs 


:.BEBEBEBB. 1. 
, BEBBEEP. . EB. . 
, BP. . EBREBB. . 


keV 


13 


vi 


A) ím (a ím) ral ím ra) üt ra ID 12) (a fa) ra) Ia? ra ia fm ma ím) im 


DESIGM 0. 14$64:REM MOB A 14.ELÜKKERN 


MAs gzázesása a d adr ka DOB au an Be Ba 
Md tagál dstels . EB. BB... Bos 
[d . , BBP. D. . . . EPBBBBBB. . . . . 
ES EBEEB oz sa EPEBBBB. .EB. . 
fő ..PBR.FR....,. EBEBBRBBEBPBE. 
(ÜL a tels, é mé tén n NSB BEBó a üzagk ük . 
ZA NCS aes BEBus áss úés 
ÉRSEK TÉTELT] as. BBBed véd wise 
Mzzéls tó b ZVTa) 2 ELL ELB Ta szé Egé a ő 

JELZES S ST S 1 a. KSÁKÁDKRÓN 
Té ászéle áa ása JESÉBBBB ZSZ zés 
(vs átal átarásik . PBB. BE. 

B sees ÜSSE BBB neten tes 
LNESES ETT EL BTS S, ja BBBB... sosa 
B zsé sara Bu B Ba BBu ő a nőé 
B lasan es Bs vs BB: BBoga seu e 
Bá lissató E..BBB..BB..... se 


8 1... BB.BB....BB..ou ss 

G , BBPBEBB.BBB...BB....... 

BZBBBBBE S ez DB BÉL vess 

B ..B..B.. os non aa BBBB. suo a 

PRINT CHRE(3OYCHR$(147):REM ZOLDHKEPERNYOTORLES 
PRINT AT-(B3. 29 DUPCCHRECIBDI4" " , 49): REM PAZSIT RAJZOLASA 
REM 

REM ikke 

REM FUTAS 

REM Ettrt 

REM 

MMORB 9.3. 199, 9. 199.1.0:REM A MOB POZICIOMALASR 
a 65-18 :REM SEBESSEG MEGHATAROZASA 

Fz1 :RE!"t KEZDOSZIN 

FOR Xz1i TŰ 348 STEP G 

F-FrO.Z: REM SZINYALTAS 

IF F-LE THEN Fz1 


719 MOB SET 8.13.F.A2.§ 

72a RLOCMOB 8,X.181.1.8:REM AZ ELSO MOB MOZGATASA 
739 FOR Y-1i TO 2A:NEZT Yv 

740 MOB OFF 8:REM A MOB KIKAPCSOLASR 


766 MOB SET 0.14.F.8.0 

774 RLOCMOR 8, XIG/2.181.1.A:REM A MASIK MOR MOZGATASA 
7898 FÜR Y-1 TŰ 28:NEXT 9 

796 MOB (FF 8:REM A MOB KIKAPCSOLASA 


enn REM 

e18 MNEXAT A 

828 COLOUR 9.5 
Példaprogramunk azt demonstrálta, hogyan dolgozzunk egyszerre több sprite-definíció- 
val. Mint már az előző fejezetben említettük a 740. és 790. sorok itt is cl!hagyhatók, csak 


a jobb érthetőség kedvéért használjuk. A 650. sorban a figura sebességét változtathatjuk. 
Próbáljunk ki minden lehetséges esetet. Mozgassunk az emberke mc!lett egy méhrajt, 
vagy helyezzünk el az út mentén fákat. 

Vezérelhetjük a figurát a billentyűzetről, vagy esetleg joystick-kal is/ 


14.2.4 DETECT -— ütközés vizsgálat előkészítése 


Formátum:  — DETECT ü 
Paraméterek: ü — az ütközés módja 

ü-—0 sprite — sprite 

ü7-—1 sprite — háttér 
Funkció: az ütközés lekérdezés előkészítése 
Példa: DETECT 1 
Ez az utasítás az ütközés lekérdezést készíti elő. Ez így első hallásra elég bonyolultan 
hangzik, és valóban nem is olyan egyszerű. Mint tudjuk a VIC chip két regisztere az 
ütközéseket regisztrálja. Az egyik a sprite-sprite, a másik a sprite-háttér ütközésekért 
felelős. Ütközés esetén a regiszterekbe egy meghatározott érték kerül; ami azonban 
mindaddig a regiszterben marad, amíg onnan el nem távolítjuk. Tehát ha a regisztert egy 
ütközést követően nem töröljük, úgy tűnik, mintha a korábbi eredmény még mindig 
aktuális volna, vagyis minden pillanatban ütközés lépne fel. 
Emiatt vagyunk kénytelenek használni a DETECT utasítást, ami törli a megfelelő regisz- 
tert, előkészítve így egy újabb lekérdezést. Következésképpen ezt az utasítást minden 
lekérdezés után, ill. előtt be kell adni. Ütközésnél nem elég az utasítást egyszer alkalmaz- 
ni, hanem a program folyamán (még akkor is, ha a program befejeződött; Id. példa), a 
következő lekérdezésig többször, de legalább kétszer le kell hívni azért, hogy a számító- 
gép nehogy véletlenül egy nem létező ütközést regisztráljon. Ez a jelenség hardver 
jellemzőkre vezethető vissza. A könyvünkben terjedelmi okok miatt ezzel nem foglalko- 
zunk. 
Látjuk, hogy a DETECT nem alkalmazható olyan egyszerűen, mint ahogy első látásra 
gondoltuk, de némi gyakorlással ez is elsajátítható. 
Az utasítás egyetlen paramétere azt mondja meg, hogy a sprite-sprite vagy a sprite—hát- 
tér regisztert kell előkészíteni az ütközést (ld. bevezetés). 
További részleteket a következő utasításból tudhatunk meg. 


14.2.5 CHECK - az ütközés lekérdezése 


Formátum:  CHECK(n1, n2), vagy CHECK(n) 
Paraméterek: n1 — azon első sprite száma, melynek ütközését egy másik sprite-tal meg 
keil vizsgálni (0—7) 
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n2 - azon második sprite száma, melynek ütközését egy másik sprite-tal 
meg kell vizsgálni (0—7) 
n — azon sprite száma, melynek ütközését a háttéralakzattal meg kell 
vizsgálni (0—7) 
Funkció: ütközés lekérdezése 
Példa: CHECK(0,7), vagy CHECK(1) 


A SIMON ss BASIC utolsó sprite utasításához értünk. A CHECK függvény jellegű, mint a 
SIN, SOR, LIN stb. Hasonlóképpen kell alkalmazni, mint a TEST utasítást, amely azt 
vizsgálja, hogy valamely grafika meghatározott helyén egy pont be van-e kapcsolva (ld. 
ott). 

Feladata annak lekérdezése, hogy az adott pillanatban végbement-e sprite-sprite vagy 
sprite-háttér ütközés. Bevezetése az előző pont DETECT utasításával történik. Ha végre- 
hajtásának időpontjában nem történt ütközés, értéke 1 lesz. Ez a paraméter változóként 
kezelhető, vele számításokat végezhetünk. 

Például: 


A — 2£CHECK(0) 1-1 


Ellenkező esetben (vagyis ütközésnél) értéke 0. A megelőző DETECT utasítás írja elő, 
hogy a sprite-sprite vagy a sprite-háttér ütközést figyeli-e. A sprite-sprite ütközés 
figyelése a következő szintaktikával lehetséges: 


CHECK(n1, n2) 


Ezzel a két paraméterrel adhatjuk meg, hogy melyik két sprite közötti ütközést vizsgáljuk. 
Más esetleges ütközéseket az utasítás nem vesz figyelembe, és értéke csak akkor lesz 
0, ha a megjelölt két objektum ütközött. Ha csak arra vagyunk kíváncsiak, hogy a 
kiválasztott sprite összeütközött-e egy tetszőleges másikkal, akkor a második paramétert 
tegyük egyenlővé az elsővel (n1 — n2). Ennek hatására minden olyan ütközést regisztrálni 
fog, amelyben ez a sprite részt vesz. 

Hasonló a helyzet a második esetben is, ha a vizsgálatot e a DETECT 1-gyel előkészítette. 
Itt a sziktaktika a következőképpen néz ki: 


CHECK(n) 


ahol n azt a sprite-ot jelöli, amelynek a háttérrel való ütközését éppen vizsgáljuk. 
(A kézikönyvben található információk ezzel kapcsolatban természetesen rosszak.) 
A szintaktikával kapcsolatban még fontos megjegyezni, hogy az utasításszó és az első 
zárójel szorosan összetartoznak (mint az AT-utasításnál), ezért nem választhatók el 
szóközzel. 

Tehát: 


CHECK(2,2) 
és nem — CHECK (2,2) 


Végül szórakozásképpen lássunk egy kis példát: 
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P. 96 

1 REM kitettek 

REM XCHECGK E 

SEM keeeeeedetekkk 

REM 

COLULIR 8.8"REM A KERET EZ A HATTEF FEKETE 
DESIGN 1.13$64:REM MOB A 19. ELOKKBAN 


CNN EN VR HL BECK ENE ELESO B") 


ki 


CK Et NY HC HNK TK EY HK HL TELE! 


úr 5 a DM EDD I 


CC EC EK lt JEL TK HL NK LEE HV) 


a ha 


vanuu u u nu. 


1£ 
1 
1 
1 
1 
1 
1 
1 
1 
1 


EOREDDDE. 
CEBDEPEDEE 
"CPNa ss 


fejei aj DESIGN A. 14$kE4:REM MOE HR 14. BLÜKKBERAN 


GAZ sa szá kkaá kelát ló E a MET ELBV AB 
SZA B szze isa aaa aaa a. dan. 
00 B sze eseveüa údúzata szád me 6 
SA HB stat ala ab kan ása EZSZSI 6 BITEK BOKA 
ÁÁ Ő o llezayvuávádásuagánsae.. 
419 8 .. s. BBB... cuuusaa sava 
428 B szeg avagua Begswagaa as nás 
4398 E 1. is as aa se Bensvasússana 
440 B 1... sssen B..ss as alá akó 
498 B 1... ssos ss BBBBB.os.ol os 
AGA ÍZ 2. iss BB...EBEBBB. ..... a 
47rü GB ..... BBB...BEBB..BB...... 
494 B ....PBBBBB..PBB.. BBP. .... 
498 8 . . PEBBBBBBBBBBB. . BBBB. . . . 
súg fa . . EEBBBBBEBERBBBBBBB. . . : 
al1g 8 . . EBEBBBBBEBBEBBBBBB. . . . 
324 8 .,..BB..BBBEBBBB. . BB. . . . . 
399 8 sáléá et BR. PEBBHE. tési BE. 
a4g fa BB... os sua BB. aaa 
999 B ll.saavssteén e. dás. sé 
900 B l.aaás.a avddnad das úú. 


58 MMOB €.0.199.9., 198.9.A:REM AZ ELSO MOB POZICIONALASA 
saga MMOB 1. 390, 199, 398, 199. 1, 8:REM A MASIK MŰ8B POZICIÓNALASR 
ea NETELT 8:REM UTKÖZESI REGISZTER TÜRLESE 

€1g REM . 

eza REM $kkikkek 

638 REM MOZGATAS 

648 REM Hákxksdeü 

es8 REM 

E6R FOR X-1i TŰ 3998 STEP 4 

67ü CMOB 2.7:REM SZINEK A MULTICOLOR MDOB-HOZ 

628 REM 

€9a MOB SET A.14.9.§.0 
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RLOCMOB A.X. 198.A.A:REM ELSO MOB MOZGATASA 

REM 

CMOB 7.2:REM SZINEK A MULTICOLOR MOB-HOZ 

MOB SET 15.13.11.80.1 

RLOCMOB 1.220-X, 4AYSINKAZ3A41.524199.1.0:REM MASODIK MOB MŰZGATASA 
REM 

NETECT A:REM AZ UTKOZESI REGISZTER LEKERDNEZESENEK ELÜKESZIÍTESE 
IF CHECK(H.17:f THEN GOTO 799 

NEXT A 

FOR Z5s1 TŰ 15 

COLOUR Z.2-1 § 

FOR Szi TŰ 38:NEXT S$:REM KESLELTETES 

NEST Z 

COLÜLIR 19.14 


14.2.6 Ellenőrző kérdések 


Ebben a bizonyára nagyon érdekes fejezetben a SIMON ss BASIC sprite-okat kezelő 


utasításairól volt szó. 
A következő néhány kérdés alapján eldönthető, mennyire sikerült az olvasottakat elsajá- 


títani. 
1. Mire kell ügyelni a DETECT és a CHECK utasítások alkalmazásánál? 


a) Ütközés után a DETECT-utasítást egyszer kell beadni az ütközési regiszter törlésé- 
hez. § 

b) A DETECT paraméter meghatározza a CHECK szintaktikáját is. 

c) A CHECK(1,1) utasítás nem engedélyezett. 

d) A CHECKY(9) utasítás nem engedélyezett. 

e) Ütközés esetén a CHECK értéke 1 lesz. 


2. Melyik szintaktika helyes? 
a) MMOB 1,30,40,50,60,2,70 
b) MOBB OFF 


c) RLOCMOB 3,70,3 
d) CHECK (2.3) 
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15. FEJEZET 
A ZENE 


Elérkeztünk ahhoz a pillanathoz, hogy hamarosan belépjünk a hangok különös világába. 
Engedjük át magunkat a hangkeltés végtelen harmóniájának és tapasztalni fogjuk, hogy 
ezidáig néma barátunk, a Commodore 64-es ezen a téren is micsoda nagyszerű dolgokra 
képes. 

Először is tudnunk kell azt, hogy számítógépünk egy jól felszerelt, háromszólamú szinte- 
tizátor. A rádióból már ismert szintetizátor-zene hasonló módon jön létre. Némi ügyes- 
séggel és fantáziával különféle zajokat, zörejeket és nagyon szép dallamokat csalogatha- 
tunk elő a segítségével. 

Természetesen a profi szintetizátor programokkal a SIMONss BASIC nem versenyezhet, 
mivel azok a számítógép képességeit teljes mértékben ezirányban használják ki, de 
néhány funkciója mégis figyelmet érdemel. 


15.1 A hardver előfeltételek 


A hangkeltő utasítások helyes alkalmazása érdekében nagyvonalakban meg kell ismer- 
kedni a különböző hangok szerkezetével. 

Ugyan léteznek bonyolult és összetett zajok, valamint hangminőségek, de legelőször 
azzal kell tisztában lenni, hogy milyen szerkezeti elemei vannak egy hangnak. 
Tekintsük először a hangmagasságot. Milyen tényező határozza meg, hogy milyen 
magas egy hang? A fizikai tanulmányainkból talán még emlékszünk, hogy a hang olyan 
gyors levegőmozgás, melyet a fülünkkel érzékelhetünk. A szabályos szinuszgörbe az 
elképzelhető legegyszerűbb hullám: 


EZAVA To 


Nos, a hangmagasság kialakulását az eredményezi, hogy a hullámhegyek és -völgyek 
milyen "sűrűek", vagyis hogy gyorsabb vagy lassúbb ütemben jutnak-e el hozzánk. 
A másodpercenként a fülünkhöz érkező hullámok számát frekvenciának nevezzük, me- 
lyet hangmagasságként érzékelünk. A másik igen fontos jellemző: a hang erőssége. Az 
erősség a hullámhegyek és -völgyek legmagasabb és legmélyebb pontjai különbségé- 
nek, vagyis az amplitúdónak a függvénye. A hangminőséget harmadikként meghatározó 
tényező a hullámforma, melyet a hanghullám alakja határoz meg. Ebben az esetben -is 
számtalan variáció létezik. A Commodore 64-es ezekből négyet ismer: 


1) Háromszöghullám 


2) Fűrészfoghullám 
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3) Négyszöghullám 


4) Zaj 


Ezek a hullámformák az ÉS logikai relációval összekapcsolhatók. 
A hangok további lényeges tulajdonsága, hogy felharmonikussal rendelkeznek. A szi- 
nuszhang kivételével nincs olyan hang, mely pontosan követné az előbbiekben vázolt 
hullámformákat. Ugyanis az egyes hullámokon belül is olyan kisebb-nagyobb rezgések 
lépnek fel, amelyek olyanná teszik, mintha egy reszkető kéz rajzolta volna. Ezeket a 
hullámon belüli frekvencia-eltéréseket is halljuk, sőt ezek határozzák meg a hang karak- 
terét, ami lehetővé teszi, hogy megkülönböztessük egymástól pl. a hegedű és a fuvola 
hangját. 
A Commodore által kínált hullámformák különböző felharmonikusokkal rendelkeznek, 
ezáltal különbség tehető közöttük. Lehetőségünk van továbbá arra is, hogy ezeket a 
felhangokat vagy levágjuk, vagy elhagyjuk. Ezeket a műveleteket szűrőkkel valósíthatjuk 
meg. Pl. a rádió hangszínszabályozója egy ilyen típusú szűrő. Ezekkel szűrhetjük ki a 
felesleges magas hangokat, és ezáltal a zene teltebb hangzásúvá válik. 
Ezeket a lehetőségeket a számítógépen is megtaláljuk. 
Megadhatjuk a hang frekvenciáját (hangmagasság), hullámformáját, valamint a kiszűren- 
dő frekvenciákat. 
A hangkeltésnek még hiányzik egy összetevője: a hang időbeni lefutása. 
Nincs olyan hang, ami megszólal és azonnal el is hallgat. Vannak lassan erősödő, majd 
lassan lecsengő hangok és vannak olyanok, mint pl. a lövések, amelyek hihetetlen nagy 
hangerővel szólalnak meg, majd kissé visszhangzanak. Számítógépen lehetőség van az 
ilyen hangok programozására. A hangok lefutásában négy fázist különböztetünk meg: 

1) Felfutás 

2) Csillapodás 

3) Kitartás 

4) Kioltás 


Grafikusan ábrázolva: 


HANGERÖOSSÉG 


; hee 
ő ( öm öss 
ILLAPODAS KITARTÁS , KIOLTAS pest 
ATA s én ún SONT TV e el ete 

A kifejezések angol megféle ői: ATTACK, DECAY, SUSTAIN, RELEASE. 
A hang keletkezésének folyamata a következő: Először is megszólal a hang. Megadhatjuk 
a teljes hangerő nagyságát és elérési idejét (ATTACK), valamint azt az időt, ami a 
SUSTALIN fázis eléréséig szükséges. A hang ilyen hangerővel szól egészen a kikapcsolá- 
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sig. Ittkezdődik a lecsengési (RELEASE) fázis, melynek időtartama szintén programozha- 
tó. A hang lefutásának jellemzőit (a hang burkológörbéjét) természetesen csak a zenemű 
elején kell megadni. Módosításáig a görbe állandó marad. 

Összefoglalva: A számítógépen három, egymástól függetlenül és egyidőben működtethe- 
tő szólam programozható, melynek mindegyikére külön-külön előírhatjuk a frekvenciát, 
a hullámformát és a burkológörbét. A hangerő és a szűrők azonban mindhárom szólamra 
érvényesek. A CBM64-es szintetizátorának a fentieken kívül egyéb funkciói is vannak, de 
ezeket nem tárgyaljuk, mert a SIMON s BASIC nem tudja kezelni őket. Részletesebb 
információkat az alkalmazói kézikönyvből. és a Commodore 64-es zenei "képességeivel" 
foglalkozó szakkönyvekből szerezhetünk. j 

A következő fejezetekben a hangképzés egyes utasításaival ismerkedünk meg. 


15.2 VOL - a hangerő beállítása 


Formátum:  VOLh 
Paraméterek: h — hangerő (0—15) 
Funkció: a megszólaló hang erősségének beállítása 
Példa: VOL 15 
A SIMON ss BASIC öt hangutasítása közül az első a VOL- (a VOLume szóból), amellyel 
megadhatjuk a három hanggenerátor hangerejét. Ezt célszerű általában a zenemű elején 
megtenni, de a hang kibocsátása közben megváltoztathatjuk (ld. példa). Ezáltal speciális 
effektusokat is előidézhetünk. Sajnos a hardver nem teszi lehetővé, hogy a szólamok 
hangerejét külön-külön is változtassuk. Ha a VOL paraméterét O-ra választjuk, mind a 
három generátor néma marad. A paraméter 15-ös értékénél kapjuk a maximális hang- 
erőt. 
Töltsük be a P. 97-es programot és próbáljuk ki: 

P. 97 

1 REM geféktetegesetetések 


3 


REM dette 


va 

A 

8 

a 

a 

gi WÜL 15 . 
s: EMVELŐPE 1.1.3.198.18 
2 x 

[új 

a 

A 

[aj 

[2] 


: 1, 0R190908 
150 Co 


JP Fa e A já jen e je Eb ja ma [/ 
DVI NN ALI ET 


REM EHKEFHEK 
REM ERŐSIÍTES 
a REM ttktkték 
248 REM 
zsaű FOR 4-A TŰ 15 
zok VILL. X:REM -HAMGERO 
pa :1 TO 24:MEZT W 
("REM A HANG ERÜSITESE 


A HANG KIKRFCSÜLHASRA 


VEL e: PEM 


40 


FOR 4515 TO B STEP -1 
A. FOR YEB TOR 


sra VOL 4":REM HANGERO 

ü FOR WzX TŰ Z5:MNEXT U:REM VARAKOZHBS 
z MEXT Y:REM A HAHG ERÜZITESE. 

4aaa MEST A:REM ELHALKULAS 

A 160.—190. sorok tartalma még nem teljesen érthető. Egyelőre elég annyit tudni róluk, 
hogy ez az utasítássor egy hosszú hangot állít elő. Az egyes utasításokra a későbbiekben 
visszatérünk. : 

Egy dolgot azonban ismerni kell a program beviteléhez. 

A 180-as sorban néhány érthetetlen karakter áll az idézőjelben. Ezek a program átvitelét 
segítik. A MUSIC utasításban szereplő nagybetűk vezérlő karakterek, melyek a képer- 
nyőn is megjelennek inverz formában, ha a SHIFT és C— billentyűk lenyomása után 
karakterkészletet váltunk: 

Ezek a karakterek a következőket jelentik: 


S: (SHIFT) , (CLR/HOME) 
I: (f2) 
J:  (f4) 
K:  (f6) 
L:  (f8) 
E: (ft) 
F:  (f3) 
G: (f5) 
H:  (f7) 


Ez a táblázat a könyv valamennyi zenei programjára érvényes. Ha elfelejtjük egy betű 
jelentését, ezen az oldalon mindig megtaláljuk. 

A MUSIC utasítás minden kisbetűje egy egyszerű karaktert jelent. A program 180-as sora 
tehát így is írható: 


180 MUSIC 150,CHR$(147) 4 "1c2"CHR$(137) 


15.3 WAVE - a hullámforma előírása 


Formátum: WAVE sz, rrsdtrsg 

Paraméterek: sz — annak a szólamnak a sorszáma, melyre a hullámformát megadjuk 
rrsdtrsg — 0-ból és 1-ből álló 8 jegyű számsorozat, amely bizonyos funkciók 
be- (1), ill. kikapcsolását (0) jelentik 

Funkció: a lejátszandó hang hullámformájának beállítása 

Példa: WAVE 2, 10000101 

A WAVE utasítás egy szólam hullámformájának beállítására és egyéb műveletek elvég- 

zésére alkalmas. 

Lássuk az egyes paraméterek jelentését: 

Az elsővel a szólam kiválasztását végezzük. 

A második ennél lényegesen bonyolultabb. Itt nyolc különböző funkciót kapcsolhatunk be 

és ki. Tehát nem kell mást tennünk, mint az alábbi ismertetett funkciók közül a használni 

kívántakra 1-est, míg a többire O-t írni. Így végeredményben nyolc 1-es, ill. 0 adódik, 

melyet a fenti formátumban a rrsdtrsg paraméter jelöl. A számjegyek között szóköz nem 

szerepelhet! 

Az utasítással közvetlenül a SID chip (hangprocesszor) néhány kitüntetett regiszterét 

programozzuk (a három szólamhoz rendre a 4., 11. és 18. regisztert). A bővebb informá- 

ciók a kézikönyvben találhatók. 

A második paraméter nyolc értéke ezen regiszterek egyikének nyolc bitjét ábrázolja. 

Az egyes bitek jelentése az alábbi: 193 


Bit Funkció 


Zajok 
Négyszöghullám 
Fűrészfoghullám 
Háromszöghullám 
Teszt bit 
Moduláció 
Szinkronizáció 
Gate bit 


Ezek után pedig következzen a részletes magyarázat. (Vö. a CBM64-es kézikönyvével.) 


OG NVRNOGARUON 


0. bit — Gate bit 

A hang megszólaltatására és megszüntetésére alkalmas. Ha értéke 1, akkor a többi bittel 
előállított hang az előre meghatározott burkológörbéje szerint szólal meg és addig 
marad SUSTAIN fázisban, amíg a bit újra O nem lesz. Amint ez bekövetkezik, a hang a 
RELEASE-nek megfelelően lecseng. Normál körülmények között a SIMON s BASIC ezt 
a bitet automatikusan vezér[li.-A WAVE utasításban azért kell mégis szerepelnie, mert 
csak így tudjuk a hang kitartása közben valamelyik paraméterét megváltoztatni. Egyéb- 
ként a hang elhallgatna. Az utasítás a hang kikapcsolására is alkalmazható. 


1. bit — Szinkronizáció 

Egyidejűleg több oszcillátor megszólaltatása esetén, a hang jellege szerint, különböző 
ingadozásokat hallunk. Ezek úgy jönnek létre, hogy például az egyik szólam hullámvöl- 
gye a másik szólam hullámhegyével találkozik. Ekkor a hangok kioltják egymást, és egyik 
hang sem hallható. Előfordulhat az is, hogy két hullámhegy találkozik és a két hang 
felerősödik. Ez a két szélső helyzet folyamatosan változik, és ennek eredménye a hang 
ingadozása. 

Ez a jelenség néha nagyon zavaró lehet. Ezt a problémát oldja meg a szinkronizáló bit. 
Bekapcsolásakor a két oszcillátor által gerjesztett hullámok azonos fázisban találkoznak. 
Az 1. bit a három szólamban eltérő feladatokat lát el. 


Szólam Szinkronizáció 
18 az 1. és 3. szólam között 
2. a 2. és 1. szólam között 
3. a 3. és 1. szólam között 


2. bit — Gyűrűs moduláció 


A SIMON s BASIC kézikönyvben minden információ megtalálható. 


3. bit — Teszt bit 

Ha a zajgenerátorral párhuzamosan egy másik hullámformát is választunk, előfordulhat, 
hogy ezzel blokkoljuk a zajgenerátort. Feloldása ezzel a bittel történik. 

4. bit — Háromszöghullám 


Ezzel a bittel a háromszöghullámot választhatjuk ki. Ez hasonlít a tiszta szinuszhullám- 
hoz, ami köztudottan nem tartalmaz felharmonikusokat. Hangzása a fuvolához hasonló. 
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5. bit — Fűrészfoghullám 
Sok, nem egyenes és egyenes felhanggal rendelkezik. Nagyon keményen cseng. Hang- 
zása hasonló a hegedűhöz. 


6. bit — Négyszöghullám 

Ennél a hullámformánál lehetőség nyílik arra, hogy a völgyek és hegyek időtartamának 
viszonyát az ún. impulzusviszonyi változtassuk. Bár a SIMON "s BASIC nem teszi lehetővé 
ennek változtatását, a következő POKE utasítások segítségével azonban a módosítás 
viszonylag egyszerűen elvégezhető: 


POKE 54272—5-1-7:ST, LB:POKE 54272—414-7:ST,HB 
ahol ST a szólamszám, HB és LB a beírandó érték alsó és felső byte-ja. 


7. bit — Zajok 

Bekapcsolja a megfelelő szólam zajgenerátorát. Nagyon sokoldalúan használható (pl.: 
tengermorajlás, lövések, sziszegés stb.). 

Végül még egy megjegyzés a 4-7 bitekhez: 

A gyakorlatban egyszerre több hullámformát is kiválaszthatunk, de a 3. bitnél elmondot- 
takon kívül ekkor az eredmény nem az egyes összetevők eredője, hanem azok logikai 
ÉS kapcsolata lesz. 


P. 98 

1 REM $EKKEKREKKTKK 

2 REMX2.YOLOAX 2 
3 REM etettek 

198 REM 

118 REM $k4k 

íz8 REM HAMG 

130 REM $£4k 

1498 REM 

1599 VOL 15 

1€8 ENYELÜPE 1,19.19.19.18 
179 MUSIC zösm. "nez 

188 FLHY 2 

198 KEM 

208 REM EttEEFREKkEk 

218 REM HULLAMFÜRMA 

220 REM titktkkkrkk 

228 REM FURESZFOG 

z4m HAVE 1.enlagani 

PALSEZ 

a REM ZAJ 

HAVE 1. 190001 

FALSEZ 

3 REM HAROMZOGZFLIRESZFÜOG 
HAVE 1.A81198691 

la PALSEZ 

4 REM HAROMSZOG 

a HAVE 1.90018041 

PALSEZ 

a RE HAROMSZOGZ/MEGYEZÜG 
HAVE 1.M1910001 

a. FRLSEZ 

! REM NEGYSZOG/FURESZFOG 
AVE 1.F1189A9i1 

FAUSEZ 

REM. NEGYSZOG/HAROMSZOG/FURESZFÚG 
28 URVE 1.01119961 

36 PAUJZEZ 
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A 150-—180-as sorok megértéséhez lapozzunk a VOL utasításnál ismertetett program 
magyarázatához. 


15.4 ENVELOPE - a burkológörbe meghatározása 


Formátum:  ENVELOPE sz,a,d,s,r 
Paraméterek: sz -— az a szólam, amelyre meg akarjuk határozni a burkológörbét (1—3) 
a — ATTACK - a felfutási fázis időtartama (0—15) 
d - DECAY - a csillapodási fázis időtartama (0—15) 
s - SUSTAIN - a kitartási fázis hangereje (0—15) 
r — RELEASE - a lecsengési fázis időtartama (0—15) 
Funkció: a burkológörbe meghatározása egy adott szólamra 
Példa: ENVELOPE 3,9,6,10,15 


Olyan utasításhoz értünk, amellyel alkotó módon határozhatjuk meg a hang burkológör- 
béjét. 

A bevezetőből már ismerjük a burkológörbe fogalmát. 

Ez a hang teljes lefutását jelenti a megszólalástól az elhallgatásig, az idő függvényében. 
A burkológörbét szólamonként külön-külön meg lehet határozni. Az egyes hangfázisok- 
hoz tartozó négy paraméterrel gyakorlatilag minden hangot meg lehet szólaltatni, csak 
tudni kell vele bánni. 

A hangok keletkezésének elvéből kiindulva két módszert különböztetünk meg: 


1) A paramétereket addig változtatjuk, amíg egy eddig ismeretlen, szép hanghoz nem 
jutunk. Nem rossz módszer, érdemes gyakran alkalmazni. Használata során megis- 
merhető az egyes paraméterek konkrét hatása. Sikeresen azonban csak egyedi 
hangeffektusok előállítására alkalmazható. 

Ha egy előre meghatározott hangot akarunk beprogramozni (pl. a fuvola hangját), 
akkor a kísérletezés helyett sokkal célravezetőbb, ha előre megtervezzük a hang 
lefutását és ennek segítségével választjuk ki a szükséges paramétereket. A két eljárás 
közül ez sokkal céltudatosabb megoldás. A fuvolahang esetén ez hosszú felfutási 
fázist (az ATTACK nagy lesz), a maximális hangerő észre nem vehető csökkenését 
(SUSTAIN és DECAY nagy), majd nagyon gyors kioltást jelent (RELEASE kicsi). 


2 


5 dei 


Példa: 

Most csak egy rövid példaprogramot kínálunk. A 200-as sorban változtathatjuk a paramé- 
tereket, hogy megismerjük működésüket. A 280-as sorban a hullámformát is módosíthat- 
juk. Próbáljuk ki a zajt is, mert itt a burkológörbe nagyon jól látható. 


P. 99 


1 REM $étttttttkk tet kkkkb 

2 REM$FENYELÜPE 

3 REM sefédekedetegetétéetesékek ekek ek 

1998 REH 

110 REM $iéFkkkkkkktik 

129 REM EL LÜGOFRBE 

198 REM $tttkkkkkkkk 

144 REM 

158 REM GYAKÜRL0-FELDA 

160 FEM VALTOZTASSLUK HAH FHRAMETEREKET ! 


178 REM STP A! DI S! OR! 
180 REM ———— sosenem erne 
199 REM ő ib e Al Be ed 
299 ENYELŐPE — 1. 18. 19. 5. 8 
218 REM ————— ehe esem eme menne 
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z29 REM 

238. REM $EtE 

248 REM HAMG 

258 REM $E44 

2560 REM 

269 VOÜL 159 

278 REM FURESZFOG 
290 HAVE 1.6n110001 
29a MUSIC 59. "MCZN" 
390 PLAY 2 

316 PALISE1:REMH KIKAPCSOLRAE 
326 HAVE 1.úm101H0A 


A 290-es és 300-as sorokkal, de különösen a 290-es sorral kapcsolatban olvassuk el a 
VOL programhoz fűzött megjegyzéseket a 15.2 pontban. Itt ismét megnézhetjük a füzérek 
írásmódját. 


15.5 MUSIC — a dallam előállítása 


Formátum: — MUSIC te fü 
Paraméterek: te — a zenemű tempója (0—255) 
fü — a hangsorozatot rögzítő füzérváltozó vagy karakterlánc 
Funkció: dallam definiálása 
Példa: MUSIC 8,A$, vagy MUSIC 10,"...hangok..." 


A MUSIC utasítással végre leírhatjuk a játszani kívánt dallamot. Ez a számítógép tárjába 
kerül, és a PLAY paranccsal játszhatjuk le. A te paraméterrel előírható, hogy a hangje- 
gyek milyen sebességgel kövessék egymást, tehát ezzel a hangok ütemét határozzuk 
meg. (A zenében ehhez különböző tempók vehetők igénybe, pl.: allegró, andante, presto 
stb.) Az alapütem mindig 1/60 másodperc. Ennél alacsonyabb értékek nincsenek. A te— 0 
esetén az egész hangjegy (1/1) 2/60 másodperc, míg a fél 1/60 másodperc hosszúságú 
és ugyanilyen hosszúak lesznek az 1/4, 1/8 stb. hangjegyek is. A te— 1 esetén az egész 
hang 5/60, azaz 1/12 másodpercig fog szólni. 

Negyedhang csak pontatlanul szólaltatható meg, mert az 5 maradék nélkül nem osztható 
4-gyel. s 

Az egész hangok időtartamára általánosan az alábbi képlet érvényes (másodpercben). 


Z — te/12 vagy Z — 5rte/60 


A képlet csak közelítő értékeket ad. (A te— 0 érték teljesen kilóg a sorból.) 

A többi hangjegy értéke az eredmény tört része vagy többszöröse. Ha pontosan akar 
negyed, nyolcad stb. hangjegyeket lejátszani, a te értékét válassza 4-gyel, 8-cal stb. 
osztható számra. 

Most pedig lássuk hogyan kell egy hangjegyet definiálni. Legjobb lesz, ha ebből a célból 
a kisbetűs-/nagybetűs karakterkészletre váltunk át a SHIFT és a C-- billentyűk egyidejű 
lenyomásával. Amennyiben ez hatástalan lenne (ez a SIMON s BASiC-ben néha előfor- 
dul), adjuk be az alábbi parancsot: 


PRINT CHR$ (S; 
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(Id. karakterkészlet fejezet). A kisbetűs karakterkészletben az egyes karakterek jobban 
megkülönböztethetők, továbbá megfelelnek a példaprogramban használt karaktereknek. 
A füzér legelején a szólamot kell megadni. Ez úgy történik, hogy idézőjel után lenyomjuk 
a SHIFT és a CLR/HOME gombokat. Ez az A karakterkészlet esetén egy inverz szívet, a 
B karakterkészlet esetén pedig egy inverz S-betűt jelent a képernyőn. Ezt követi a szólam 
száma (1-3). Ha új szólamra akarunk áttérni, akkor is ezt az utasítást alkalmazzuk. Ez 
akkor előnyös, ha pl. a 3. szólamra más hullámformát vagy burkológörbét adunk meg és 
zene közben akarjuk módosítani a hangszínt. 

Többszólamú zenére azonban nincs lehetőség (leszámítva azt az esetet, amikor az előző 
szólam utolsó hangja áthallatszik a következő szólam hangjaiba). 

Következő paraméterként a lejátszandó hangjegyeket (és nem hangjegy értékeket, mint 
a kézikönyv írja) kell megadni két értékkel. 

Először szerepeljen a hangjegy neve, utána az oktáv száma. A hangok elnevezése a 
szokásos amerikai írásmódot követi: 


CDEFGAH 


(az utolsó betű H, és nem B, ahogy a kézikönyvben áll). Ha a hangot félhanggal magasab- 
ban akarjuk megszólaltatni, akkor a hangjegyet a SHIFT billentyűvel kell beírni, ami 
megfelel a hangjegy előtti [-nak. Ezután adjuk meg az oktávot (0-7), amelyben a hang 
megszólal. (PI. a normál A-hang, 440 Hz frekvenciával a 4. oktávban van. Megszólaltatása 
"A 4" bevitelével lehetséges.) 

A legmagasabb bevihető hang a 7. oktáv magas A-ja: "A7". 

A hangra vonatkozó információkat a hangjegy időtartamával zárjuk, melyeket a funkció- 
billentyűkkel hívunk le: 


Billentyű Tempó Képernyő 

fi 1/16 inverz nagy E 
13 1/8 inverz nagy F 
15 1/4 inverz nagy G 
f7 1/2 inverz nagy H 
12 1/1 inverz nagy I 

f4 2/1 inverz nagy J 
16 4/1 inverz nagy K 
18 8/1 inverz nagy L 


Ezzel befejeződött egy hang definiálása. A többi hangra ugyanúgy kel! eljárni. Az infor- 
mációk között nem lehet szóköz. 


Ha egy 3/2 (1 1/2) értékű hangot akarunk megszólaltatni, akkor ezt több funkcióbillentyű 
nyomásával érhetjük el. A hangjegyértékek ilyenkor összegződnek. Esetünkben ez az f7 
f7 f7 vagy az f2 f7 billentyűket jelenti. Normál körülmények között az egyes hangok kötve 
(legato-ban) szólalnak meg. Ha a következő hangot külön akarjuk indítani, akkor a 
SHIFT/CLR/HOME és a g billentyűket kel! működtetni. Ugyanaz a helyzet, ha szólamvál- 
táskor el akarjuk kerülni az előző szólam továbbhangzását. Ez kikapcsolja a hangot, és 
ha mögé egy vagy több hangjegyértéket teszünk a megadott hosszúsághoz, akkor még 
szünetet ís előállíthatunk. 

Az ismertetett módon nagyon könnyedén megszólaltathatunk egy egyszerű dalocskát, 
míg hosszabb darabokhoz (ld. példa) több füzért keil összekapcsolni. 

Könnyen beiktathatunk ismétléseket is. 

Az utasítás alkaimazását a PLAY utasításnál ismertetjük. 
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15.6 PLAY - a dallam lejátszása 


Formátum: PLAY m 
Paraméterek: m — játékmód 

m-1 várakozás a játék végére 

m7-2 játék és számlálás 
Funkció: a MUSIC utasítással rögzített dallam lejátszása 
Példa: PLAY 1 

e 

Az m paramétertől függően a PLAY utasításnak két változata van. 
Ha m-—1, akkor a program a zene lejátszásának végéig vár. Tehát a PLAY 1 utasítás után 
a többi utasítás csak a zene lejátszása után kerül végrehajtásra. Ilyenkor a program csak 
a RUN/STOP billentyűvel szakítható meg. Ezzel szemben, ha m— 2, a zene megkezdése 
után a program azonnal rátér a következő utasítás végrehajtására úgy, hogy a zene szól. 
Jól érzékelhető ez az alábbi programban. Ha a program még a zene befejezése előtt 
lefutott, akkor a zene is félbeszakad, és az utoljára megszólaló hang szól mindaddig, 
amíg a VOL 0, vagy a WAVE sz, 00000000 utasítással ki nem kapcsoljuk. A kézikönyvben 
ismertetett PLAY 0 utasítás teljesen hatástalan. 
A PLAY 2 utasítás akkor is jól használható, ha zene közben akarunk különböző zenei 
paramétereket változtatni (Id. a VOL és WAVE példákat). Sajnos ha a zene a program 


lefutásánál rövidebb, semmit sem tehetünk. Ezért a program időtartamát próbálgatással 
be kell állítani. 


SEREG kiN US 2 a. 
2 rem tikkttkkkkkk jeeeteetétek 


199 rem 

119 rem 

128 vem ESEKEEREEEFEEEEFEEK 
179 rem a nap nyugodni ter 
148 vem ESEKEKERESEEKEEE KKK 
15ú rem 

166 vol 15:rem hangero 

178 rem 

198 rem han3.iegyek 

198 rem 


208 3$-"S1Cc32HF3SRZKAZHAZHa 2 d03 ár 3 Hs3 Ha S SAS H4 4 Boda 3 da 2" 
2198 a$za$t"c4B-4áRRZI TAI HIBA Ha 0 s ktösl" 

228 b§-"cd4agskdóF 44 Had 4 AZ AT OSZ TASHA 411" 
230 bázL$t"c4 AZ da 4 HAH da 2 ZH 4 Ha 2 álrete a" 
248 rem EZ 
25a rem 

2EN rem haromzzog 

270 wave 1, ennimAn1 

298 envelope 1.4.5.5.§ 

298 rvem EEEEFEEEEEEKEKEEK 

399 music 198.a$tb$itb$ 

318 Play 2 

320 rem EKREKZEREEEEEEKEKETK 

239 Print. chr$(1472 :rera-a kePermyo törleze 

gdA Print "a naF nyugodni ter " 

35 for uzi to 2EMM: next w 

369 Print"leszgll a csendes ei" 

370 rem 

39898 far wsi to 26AR :next Ww 

398 Print. "mar bucsut mondunk " 

498 for wzi to 2EAA "next 1 
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418 for x-1l ta 72 


42a Print 
43Aa Print"a tolgy a berc alatt" 
448 for wsli ta 2600 :next w 


459 Print"oly buzan bologat " 
46 für wzi ta 2688 :next W 

47 Print"mert. el kell valnunk" 
499 for. wuw-1 to 2600 :next Ww 
499 next. x. 7 

saga vol 8 


Bizonyára nem okozott gondot a füzérekben található karakterek értelmezése. Ha mégis, 
akkor lapozzuk fel ismét a VOL utasítást. 

A legfontosabb tudnivalókat ismételjük át itt is. (Fontos, hogy a kisbetűs/nagybetűs 
karakterkészletet használjuk.) A kisbetűk a normál hangjegyeket jelölik, bevitelük a 
megfelelő billentyűvel a szokott módon történhet. A listában szereplő nagybetűk vezérlő 
karakterek, melyek a nyolc funkcióbillentyűvel (E-L) és a SHIFT/CLR/HOMESS billentyűk- 
kel érhető el. Ezek a betűk a képernyőn inverz alakban láthatók. 

A nagybetűk megemelt hangokat jelentenek, és a megfelelő betű és a SHIFT együttes 
lenyomásával állíthatók elő. A képernyőn ezek normál nagybetűként jelennek meg. 
A számok a szokott módon a szólamra, illetve az oktávra vonatkoznak. 
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15.7 Ellenőrző kérdések 


il: 


Mi történik a VOL 2 utasítás hatására? 


a) Valamennyi szólam hangerejét kettes fokozatra állítja. 
b) Meghatározza 2 szólam hangerejét. 

c) A szintaktika nem jó. 

d) A VOL 2 a harmadik legerősebb fokozat. 


Mit kell a WAVE utasításnál figyelembe venni? 


a) A WAVE az összes szólamra beállítja a hullámformát. 
b) A zaj nem kombinálható más hullámformával. 
c) A szintaktikája: WAVE z, 90 00010001. 


Hogyan használjuk a MUSIC-utasítást? 


a) Ilyen utasítás nincs. 

b) Először a ritmust, majd a hangokat adjuk meg. 

c) A b) válasz fordítottja. 

d) Egy hangot a név, oktáv és az érték megadásával definiálunk. 


e) Ha a hangjegyet a SHIFT billentyűvel ütjük be, leszállított hangot kapunk. 
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16. FEJEZET ek 
VEZÉRLŐ PERIFÉRIÁK 


A Commodore 64-esnek megvan az a lehetősége is, hogy vezérlő egységeket, mint 
perifériális építőelemeket csatlakoztassunk hozzá. A számítógép oldalán két kontrol-port 
csatlakozási lehetőség található, melyeken keresztül joystick, paddle, fényceruza, ill. 
egyéb saját építésű vezérlőegység csatlakoztatható. Az egyes kivezetések műszaki 
jellemzőit a CBM 64 kézikönyvében találjuk meg. A joystick csatlakoztatásához termé- 
szetesen nem kell belemélyedni a technikai részletekbe. Ebben a fejezetben azon perifé- 
riális egységekről szólunk, melyeket a SIMON s BASIC támogat. 


16.1 Fényceruza 


Fényceruza alatt egy olyan perifériális egységet értünk, amelynek segítségével közvetle- 
nül a képernyőre vihetünk, vagy csak meghatározhatunk egy pontot. Használatával arra 
is lehetőségünk van, hogy egyszerűen a képernyőhöz érintve átadhassunk a számítógép- 
nek egy képpozíciót. De hogyan történik mindez? 
Az 1. kontrol-port-ra csatlakoztatott fényceruzával rámutatunk a képernyő valamelyik 
pontjára (lehet a képmezőn kívülre is). A számítógép azonnal képes a pont koordinátáit 
meghatározni. Így írhatunk pl. olyan programot, amellyel megállapíthatjuk, hogy egy 
adott helyen létezik-e a keresett tárgy (betű vagy grafika). De ennél létezik egy sokkal 
érdekesebb felhasználási terület is, mégpedig a rajzolás. Szabadkézzel rajzolhatunk a 
fényceruza segítségével. Felhasználható a fényceruza, kényelmes kurzorvezérlő eszköz- 
ként és még számtalan módon. A fényceruza más koordináta-rendszerben működik, mint 
amit a grafikánál megismertünk. 
Az alábbiakban megadott számértékek csak irányértékek. Értékük a különböző tv-készü- 
lékeknél más és más lehet. Mint már utaltunk rá, a koordináta-rendszer nem a képmező, 
hanem a képernyő szélénél kezdődik. Az x értéke 30-nál, ami a képernyő peremének felel 
meg, míg a szövegmező széle 40-nél található. A megfelelő értékek a jobb oldalon: 200, 
ill. 210. § 
Az y-tengely irányában a helyzet kicsit bonyolultabb. Az x koordinátához hasonlóan y is 
30-nál kezdődik, a képmező 40-nél indul és 240-nél fejeződik be. A képernyő alsó fele két 
részre oszlik. Az y—255-ig a koordináták még szabályosan változnak, de nagyjából a 
képmező közepétől y— 0-tól újra indul a számozás és y— 25-ig tart. 
Ahhoz tehát, hogy a fényceruza koordinátáit az általunk megszokott beosztásra átszámít- 
suk, az alábbi képletet kell használnunk: 

Xx — (xp—40)r2 

y - yp— 40 
ahol: x, y a grafika, míg az xp, yp a fényceruza koordinátái. A képletekből láthatjuk, hogy 
a képernyő felbontása a grafikáénak a fele. Ez azonban nem jelent sokat, mert a fényce- 
ruza felépítésénél fogva x-irányban úgyis szór. 


I 


16.1.1 PENX -— a fényceruza vízszintes irányú helyzete 
Formátum:  PENX 


Paraméterek: — 
. Funkció: a fényceruza x koordinátájának meghatározása 
Példa: x- PENX 


A fényceruza képernyőn elfoglalt aktuális pozíciójának meghatározásához egy egész sor 
PEEK és POKE utasítást kell! bevinni a képvezérlő különböző regisztereibe. A SIMON s 
BASIC segítségével mindez leegyszerűsödik. 
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A PENX utasítás használatával egyszerűen és gyorsan megtudhatjuk a fényceruza 

x-koordinátáját. Függvényként kell alkalmazni úgy, mint a TEST, LIN vagy az SOR utasí- 

tást. Értékét tárolhatjuk változóban és különböző számításokat végezhetünk vele. Pl.: 
x — 5 £t PENX 4 4 

Az utasítás mindig a fényceruza legutolsó pozícióját adja meg. A koordináta-rendszer 


kezdőpontját most nem a képmező bal felső sarka, hanem a képernyő bal széle jelenti. 
De még ezzel a bővítéssel is kisebb a felbontás, mint a nagyfelbontású grafikánál. 


16.1.2 PENY - a fényceruza függőleges irányú helyzete 


Formátum:  " PENY 


Paraméterek: — 
Funkció: a fényceruza y-koordinátájának meghatározása 
Példa: y — PENY 


A PENY utasítás teljesen analóg módon működik, mint a PENX az x-koordináta meghatá- 
rozásánál. 

A mérés szintén a képernyő szélétől történik, nevezetesen az y — 30 értéktől. Függőlege- 
sen összesen 250 pont van. Ha ezt a SIMON s BASIC grafikájára át akarjuk számítani, 
a bevezetőben ismertetett képletet használjuk. Töltsük be a példaprogramot és indít- 
suk el: 


P. 101 


1 REM kikktekk tk kk kk akk kkök 

2:REM$EPENRAPENYE 

3 REM EXREEKEEEEER ETEK Ek 

198 REM 

119 HIRES 6.7 

12 FRÜC Pl.OT 

130 Xz(PENX-49) 2: REM X KÜÜRDINATA KISZAMITASA 

146 Y-PENY-49 :REM Yv KOÜRDIMATA KISZAMITASA 

159 IF XCA OR $D319 ÚR V2199 THEN CALL PLOT ; 
169 LIME XR.TA.X.7.1:REM VONAL RAJZOLASA A REGI KOORDINATABOL AZ UJBA 
17 XFA-X 

189 vYAzY —:REM ERTEK MEGADASA 

199 GET. A$:REM PILLENTTURE VAR 

29a IF A$z"-" THEN"HIRES 6.7 :REM "-"-MEL TÜRLES 

219 CALL PLUÚT 


Ennek a programnak a segítségével fényceruzával rajzolhatunk a képernyőre. 
Próbáljuk ki! 4 
Vigyük be az aláírásunkat vagy valamilyen rajzot. 
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16.2 Paddle és joystick 


Ebben a fejezetben azokról a vezérlő perifériákról lesz szó, amelyeket főleg a játékprog- 
ramok futtatásánál használunk. 


Paddle: 


A CBM 64 összesen 4 ún. A/D átalakítót (analóg/digitális átalakító) tartalmaz. Ezek olyan 
elektronikus kapcsolások, melyek lehetővé teszik analóg jelek mérését (pl. hőmérséklet) 
és ezek digitális tárolását a számítógépben. Ezek a digitális értékek egy 256-os skála 
részei. Az A/D átalakítókhoz a kontrol-port-on keresztül paddle is csatlakoztatható. Ez 
tulajdonképpen egy forgó potenciométer, amin forgatással 0 és 255 közötti értékeket 
állíthatunk be. A kiválasztott értékek megfelelő programmal feldolgozhatók. Szolgálhat- 
ják pl. a hangutasítások paramétereinek vezérlését és ezáltal szép, különleges effektu- 
sok előállítását. 


Joystick 


A joystick a legelterjedtebb perifériális egység, mivel a játékprogramok egyik szükséges 
eszköze. Ez egy valódi botkormány, amit minden irányban elmozdíthatunk. Ezen felül 
rendelkezik egy tűzgombbal, ami nyomogatható. Lekérdezhetjük a joystick helyzetét, 
valamint a tűzgomb állapotát. 

A botkormánnyal különböző figurák mozgathatók a képernyőn, és lövések adhatók le. 
Szinte minden, a Commodore 64-esre írt játék megkívánja a használatát, de természete- 
sen nagyon jól vezérelhető vele a kurzor is. 


16.2.1 POT - a paddle állásának leolvasása 


Formátum:  POT (p) 

Paraméterek: p: a paddle sorszáma 

Funkció: a paddle állásának leolvasásge 

Példa: x - POT (1) 

A paddle aktuális értéke határozható meg ezzel az utasítással. A függvényekhez hason- 
lóan a POT utasítás is beépíthető a számításokba. Kezelésére ugyanazok érvényesek, 
mint a PEN-re. Nézzünk két mintaprogramot: 
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REM KEtFEEFEKFETE 

REH § 1.FÜT 

REM Ettttkkt kk 

REM 

PRIHT CHR$(147) :REM A KEPERNYO TÖRLESE 

F-POTÉH :REH A PADDOLE ERTEKEMNEK KIOLYASASR 
PRIRT PF 

GOTO 129 


— a B EJ E 


Ríi0 rEZ 
[nvdik vki SA? 
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1 REM téttEkKEKEK 

Ed E ÉT et 
2 REM tek kktprkkt 

REM 

PRINT CHRE(1475 :REM KEFERNTÜ TÖRLESZE 
FÜü-FÜTLH 2 :REH A FARDILE § ERTE 
TA 3 :REM A FADDLE 1 ERTEKENEK KIÜL ME 
HESS ZREM RE ZELHESZÉ KIJELOLT HEL 9PE 


pa 
17 
HNAZÜRI 
É ak 


EMEK MOT 


A e 
MRJ EG 


horn Én KV ÉKVÉS 
ma 
fjasá 
nm 
a 
fe] 
a 


COTO 177 
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16.2.2 JOY — a joystick állásának leolvasása 


Formátum: JOY 


Paraméterek: — 
Funkció: a joystick állásának leolvasása 
Példa: J — JOY 


A JOY utasítással a joystick aktuális helyzetét lehet lekérdezni. Sajnos azonban csak a 
2. kontrol-port-ra csatlakoztatott joystickra érvényes. 


Az 1 kontrol-portot valószínűleg azért nem vonták be az utasítás hatáskörébe, mert az 


ehhez kapcsolt botkormány bizonyos állásaiban betűket és más jeleket küld a számító- 
gépnek. 


Az utasítás minden irányra más értéket vesz fel, az alábbi elrendezésnek megfelelően: 


Példa: 


Ha a joysticket előretoljuk, az eredmény 1 lesz, balra előre 8. Ha a tűzgombot is lenyom- 
juk, a pillanatnyi értékhez a számítógép hozzáad 128-at. 


P. 104 

1 REM KEEEKEHKK 

2 REN FK gát a 

S REM 3 tktEk 

100 REN 

118 IF JÜrzi OR JÖr-i29 THEN PRINT " FELFESE 
12a IF JOY-Z THEN -ERINT JIÜBERA" 
154 IF JOY-5 ; THEN FRINT " LEBELE" 
149 IF JOYz7 metga THEMGERTNT EARLRA" 
Tot ES Öv THEM FRINT "TLZGOHE" 

1e4 GOTŰ 118 
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17. FEJEZET 
FÜGGELÉK 


17.1 Az "Ellenőrző kérdések" megoldásai 


Az alábbiakban közöljük a tesztfeladatok helyes megoldásait: 


FEJEZET MEGOLDÁS 

2.1.3 u2- 2/e. 3/c. 4/c. 

2.2.4 T/as 2/a. 89/D.6. 4/b, c. 

2.3.5 176 2/a. SZG 4/b. 5/b. 6/b. 

3.1.6 17e. 2/a. 3/a, b. 4/a. 5/b. 

3.2.5 1/a. 2/d. 3/c. 4/b. 5/6: 

iogái érs 1/b. 2/b. 3/b. 4/a. 5/d. 

5.2.6 1/a, b. 2/a. 3/b. 4/b. 5/b. 6/c. 

6.3 1/b. 2/D: 3/a, b, c. 

71.65 1/b. 2/a. 3/b. 4/c. 5/b. 

7.2.3 1/c. 2/a, c. 3/a. 4/b, d. 

8.5 1/6. 2/a, c. 3/d. 5/ce. 6/ce. 
7/b. 8/a. 9/e. 

9.1.6 1/b. 2/b, d, f. 3/ce, d. 

9.2.5 h //ot 2/c. 3/ce. 

9.3.4 1/b, d. 276: 

9.4.6 1/c. 2/b, c. 3/e. 

9.5.5 1/d. 2/a, d. 

10.4 1/d. 2/c. 3/b. 4/b. 

41.T.5 1/á. 2/a. 3/e. 4/d. 

11.2.3 1/a, b. 2/c. 3/b. 

12.2.7 1/b. 2/c. 9706; 

12.3.10 1/e, e, f. 2/b. 3/a, b, c. 

12.4.3 1/a, c. 2/c. 3/a, d. 

12.5.3 1/b, c. 2/b. 3/b. 

13.5 1/b, c, d 2/8 

14.1.5 1/b, c 2/d 3/b, d 

14.2.6 1/b, d 2/a 

15.7 1/a. 2/b. 3/b, d, e. 
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17.2 Színkód táblázat 


Grafikus utasításoknál szükséges a színek színkód alakjában történő bevitele. A 16 szín 
mindegyikéhez tartozik egy ilyen kód. Ezeket a kódokat tartalmazza az alábbi táblázat, 
amely ezen kívül megadja a működtető vezérlőbillentyűket is. 

AK a CTRL, míg a C a Commodore (C—) gombot jelöli. 


Kód Szín Billentyű 
0 fekete K1 
1 fehér § K2 
2 vörös K3 
3 türkiz K4 
4 ibolya KS 
5 zöld K6 
6 kék K7 
7 sárga K8 
8 narancs C1 ; 
9 barna C2 
10 világos vörös C3 
11 1. szürke C4 
12 2. szürke C5 
18 világoszöld C6 
14 világoskék (egé 
15 3. szürke C8 
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17.3 Hibaüzenetek 

A SIMON s BASIC teljes hibaüzenetlistáját és leírását az alábbiakban ismertetjük. Sajnos 
ezek a kézikönyvből teljesen hiányoznak. 

PROC NOT FOUND 

Ez az üzenet akkor jelenik meg, ha a programban nem definiált szimbolikus ugrási címre 
hivatkozunk. Körülbelül az UNDEFD STATEMENT ERROR hibajelzésnek felel meg, ami 
a BASIC-ben a nem létező sorszámra történő ugráskor kerül kiírásra. 

INSERT TOO LARGE 

Az INST és INSERT utasításoknál (ld. a 8.1./8.2. fejezetet) léphet fel, ha nemlétező 
karakterpozíciót adtunk meg, vagy a belső füzér hosszabb a külsőnél. 

STRING TOO LARGE 

üzenetet kapunk, ha az INST és INSERT utasításokkal 255 karakternél hosszabb füzért 
állítunk elő. Megegyezik a normál BASIC"STRING TOO LONG ERROR" hibaüzenetével. 
NOT BINARY CHAR 

Ezt a hibaüzenetet akkor kapjuk, ha a 95 jellel kezdett bináris szám a 0 és 1 karaktereken 
kívül mást is tartalmaz, ill. túl hosszú. Ugyanflyen üzenetet kapunk, ha a WAVE utasítás- 


nál kitesszük a 9 jelet, mert itt nincs rá szükség. 
e. 


NOT HEX CHAR 

Analóg az előbbi hibajelzéssel, csak ez a $ jellel kezdett hexadecimális számokra 
vonatkozik. 

END PROC WITHOUT EXEC 

Azonos a normál BASIC "RETURN WITHOUT GOSUB ERROR?" hibajelzésével. Akkor lép 
fel, ha END PROC utasítást alkalmazunk, megelőző EXEC utasítás nélkül. 

END LOOP WITHOUT LOOP 

Analóg a "NEXT WITHOUT FOR ERROR" normál BASIC hibaüzenettel. Akkor lép fel, ha 
END LOOP utasítást alkalmazunk, megelőző LOOP utasítás nélkül. 

UNTIL WITHOUT REPEAT 


Megegyezik az előző hibaüzenettel, de a REPEAT ciklusra vonatkozik. 
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STACK TOO LARGE 


Hasonló az "OUT OF MEMORY ERROR" hibaüzenethez. Túl sok ciklus vagy szubrutin 
alkalmazása idézi elő. s 


BAD CHAR FOR. A MOB 


Ez a hibaüzenet a sprite- vagy karakterdefinícióban használt túl sok (vagy túl kevés) 
karakter. szerepeltetését jelzi. Ezt a hibaüzenetet kapjuk, ha a definícióhoz sok vagy 
kevés sort használunk fel, ill. a DESIGN utasítás és a definíció közé valamilyen BASIC 
sort iktatunk. 


BAD MODE 


Hasonló az "ILLEGAL OUANTITY ERROR" hibajelzéshez. Akkor jelenik meg, ha a SI- 
MON s BASIC engedélyezett tartományait átlépjük. 


17.4 A SIMON s BASIC utasításkészlete ABC sorrendben 


Utasítás 


AUTO 
BCKGNDS 
BFLASH 
BFLASHO 
BLOCK 
CALL 
CENTRE 
CGOTO 
CHAR 
CHECK 
CIRCLE 
CMOB 
COLD 
COLOUR 
COPY 
CSET 0/1 
CSET 2 
DELAY 
DESIGN 0/1 
DESIGN 2 
DETECT 
DIR 
DISAPA 
DISK 
DISPLAY 
DIV 
DOWN 
DRAW 
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Utasítás 


DUMP 
DUP 

END PROC 
ENVELOPE 


: ERRLN 


ERRN 
EXEC 
EXOR 
FCHR 
FCOL 
FETCH 
FILL 

FIND 
FLASH 
FRAC 
GLOBAL 
HI COL 
HIRES 
HRDCPY 
IF/THEN/ELSE 
INKEY 
INSERT 
INST 

INV 

JOY 

KEY 

LEFT 

LIN 

LINE 
LOCAL 
LOOP/EXIT IF 
END LOOP 


47 
47 


Utasítás 


LOW COL 
MEM 
MERGE 
MMOB 
MOB OFF 
MOB SET 
MOD 
MOVE 
MULTI 
MUSIC 

NO ERROR 
NRM 

OFF 

OLD 

ON ERROR 


REPEAT/UNTIL 
RENUMBER 
RESET : 


Utasítás 


RETRACE 
RIGHT 
RLOCMOB 
ROT 
SCRLD 
SCRSV 
SECURE 0 


OI- 
dal 


17.5 A SIMONSs BASIC jellemzői 


BASIC-tár igénye: 8 kbyte ($7FFF-$9FFF). 
Részben a BASIC-ROM alatti területet foglalja el. 
Részben a BASIC-ROM-ra, részben a BASIC-RAM-ra kapcsol. 


A RUN/STOP védelem POKE 788,52-vel, a RUN/STOP-RESTORE védelem POKE 
792/193-mal nem lehetséges, mivel az interrupt-szektor "elhajlik". 


DATA BECKER IEC-busz változat S 3.0-val futtatható (kivéve a jelkészlet változtatást 
— 13. fejezet). 


DISKOMAT-tal (SUPERTWIN és DISK MONITOR) futtatható, ha a "SUPERTWIN IEC- 
busz" üzemmódot választjuk ki. 


80 karakteres "MAXI64" kártyával nem futtatható. 


A PROFIMAT csomagban lévő PROFIMON 64-gyel működőképes: 


VC 1526-os nyomtatón a HIRES grafika nem biztosít hardcopyt. 
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— JEGYZET — 


Megnyílt a NOVOTRADE Rt. 
COMMODORE Users klubja! 


SZOLGÁLTATÁSAINK: 


— klubtagoknak szabad gépidőt és szakirodalmat 
biztosítunk. 

— közületeknek és magánszemélyek részére C 
16-os, C 64-es programozói, valamint speciális 
tanfolyamokat szervezünk. 


RÉSZLETES FELVILÁGOSÍTÁS: 


Számítástechnikai szaküzlet 


1136 Budapest, Balzac u. 35. 
Telefon: 402— 954 
Gábriel László klubvezetőnél 


Fra! 355—. 


KLTE ÉCTNIKA A KÖNYVESBOLTOKBAN . 


NOVOTRADE - 2C kdléni 
1136 Bp., Balzac u. 35. Tel.: 402-954 


Az alább ildtretrűzletegben már az Önök rendel úösüséké állunk: 


ÁLLAMI. KÖNYVTERJ TŐ V. — NOVOTRADE 2C 


; i BUDAPEST 


" Táncsics Kön yvesbolt 
1073Lei 1 ő 
Telefon: jilvéks vé. Telefon: ést szem 


MŰVELT NÉP KÖNYVTERJESZTŐ V. — NOVOTRADE 2C 
PÉCS VESZPRÉM 


Zrínyi Miklós jslézáááázás als Kölcsey Ferenc Könyvesbolt 
7621 - 8200 Kossuth LL. u. 8. 


DEBRECEN 


Szak- és Ismeretterjesztő 
Köny váruház 


Telefon: 52-23237 
SZOLNOK ! 


Szigi gegek ahpákdegyetjá 


